在窗体上画一个命令按钮,名称为Command1,然后编写如下代码: Option Base 0 Private Sub Command1_Click() Dim A1(4)As Integer,A2(4)As Integer

admin2020-04-18  35

问题 在窗体上画一个命令按钮,名称为Command1,然后编写如下代码:
    Option Base 0
    Private Sub Command1_Click()
    Dim A1(4)As Integer,A2(4)As Integer
    For k=0 To 2
    Al(k+1)=InputBox("请输入一个整数")
    A2(3-k)=A1(k+1)
    Next k
    Print A2(k)
    End Sub
    程序运行后,单击命令按钮,在输入对话框中依次输入2、4、6,则输出结果为

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

答案C

解析 本题的关键之处在于抓住每次具体给哪个数组元素进行了赋值,第一次循环中输入的2被赋给了A1(1)和A2(3),第二次循环中输入的4被赋给了A1(2)和A2(2),第三次循环中输入的6被赋给了A1(3)和A2(1),跳出循环时k的值为3,所以最后输出2。
转载请注明原文地址:https://kaotiyun.com/show/LwTp777K
0

最新回复(0)