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

admin2020-07-22  23

问题 在窗体上画一个命令按钮,名称为Command1,然后编写如下代码:
    Option Base 0
    Private Sub Command1_Click()
    Dim A1(4)As Integer,A2(4)As Integer
    For k=0 To 2
    A1(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

解析 程序运行过程如下:
    k=0,输入2,A1(k+1)=A1(0+1)=A1(1)=2,A2(3一k)=A2(3一0)=A2(3)=2
    k=1,输入4,A1(k+1)=A1(1+1)=A1(2)=4,A2(3一k)=A2(3—1)=A2(2)=4
    k=2,输入6,A1(k+1)=A1(2+1)=A1(3)=6,A2(3一k)=A2(3—2)=A2(1)=6
    k=3,For循环结束,输出A2(k)的值即A2(3)的值,即2。
转载请注明原文地址:https://jikaoti.com/ti/nGS0FFFM
0

最新回复(0)