用VB打印菱形.pdf

《用VB打印菱形.pdf》由会员分享，可在线阅读，更多相关《用VB打印菱形.pdf（2页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。

.1 在 Form_Click()事件过程下打印如下图形。（提示：数值类型输出带符号）。SubForm_click()For i=1 To 9Print Tab(10-i);For j=1 To 2*i-1Print(Str(i);Print Trim(Str(i);Print#;Next jPrintNext iFor i=8 To 1 Step-1Print Tab(10-i);For j=1 To 2*i-1Print(Str(i);Print Trim(Str(i);Print*;Next jPrintNext iEnd sub.图 1 第 1 题 图形.