第08章 VBA结构化程序设计-例题习题.pptVIP

* Dim i, j As Integer Debug.Print Space(3); For i = 1 To 9 循环用来生成第一行的数据 Debug.Print Format(i, 0#); ‘i输出格式控制 Next Debug.Print 用来另起一行输出 For i = 1 To 9 Debug.Print i; For j = 1 To 9 Debug.Print Format(i * j, 0#); Next Debug.Print Next 大家好 * 【例8-13】打印如图所示对称三角图形，要求第一行的 * 在第10列。 * *** ***** ******* 算法分析： 1)4行（类似4个学院）--外循环 2)2m-1列（类似2m-1个班级）--内循环 大家好 * Dim i, j As Integer For i = 1 To 4 控制输出的行数 Debug.Print Tab(11 - i); 定位每行第一个*所在的列数 For j = 1 To 2 * i - 1