编写如下程序: Private Sub Command1_Click() For i = 1 To 4 Print Space(12 - 3 * i); For j = 1 To i Print j;

admin2015-08-28  34

问题 编写如下程序:
Private Sub Command1_Click()
   For i = 1 To 4
      Print Space(12 - 3 * i);
      For j = 1 To i
         Print j;
      Next j
      For k = i - 1 To 1 Step -1
         Print k;
      Next k
      Print
   Next i
End Sub
程序运行后,单击命令按钮Command1,输出结果为

选项 A、 1
1  2  1
1  2  3  2  1
1  2  3  4  3  2  1
B、 1
            1  2  1
      1  2  3  2  1
1  2  3  4  3  2  1
C、1
      1  2  1
   1  2  3  2  1
1  2  3  4  3  2  1
D、 1  2  3  4  3  2  1
   1  2  3  2  1
      1  2  1
         1

答案C

解析 Print Space(12 - 3 * i)语句为打印空格符。根据变量i的值变化,打印的个数不同。For循环的执行根据变量值进行相应的打印。选C)。
转载请注明原文地址:https://jikaoti.com/ti/5Y60FFFM
0

最新回复(0)