编写如下程序: Private Sub Command1_Click() For i = 1 To 5 Print Tab(6 - i); For j = i To 1 Step -1 Pri

admin2020-07-22  24

问题 编写如下程序:
Private Sub Command1_Click()
    For i = 1 To 5
        Print Tab(6 - i);
        For j = i To 1 Step -1
            Print "*";
        Next j
        Print
    Next i
End Sub
程序运行后的输出结果是

选项 A、                    *
                   **
                  ***
                 ****
                *****
B、     *
     **
     ***
     ****
     *****
C、*****
*****
*****
*****
*****
D、*****
*****
  *****
   *****
    *****

答案A

解析 Tab(n)将光标移到第n列,从第n列开始输出信息。为便于理解,在本题中可以将其理解为n个空格。在外层循环的循环体中,先Print Tab(6 - i)打印了6-i个空格,在执行内层循环,输出i-1个"*"号字符,最后Print换行。最外层循环变量i从1到5变化,当i=1时,输出6-1个空格,j为1,第一行输出1个"*"号字符,最后换行;当i为2时,输出6-2个空格,第二行输出2个"*"号字符,最后换行;…依次类推,当i=5时,输出6-5个空格,第五行输出5个"*"字符,最后换行。A与程序中的每行光标位置和输出字符情况一致,故选择A项。
转载请注明原文地址:https://kaotiyun.com/show/nSHp777K
0

最新回复(0)