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

admin2013-11-29  32

问题 在窗体上面一个命令按钮,名称为Commandl,然后编写如下代码:
    Option Base 0
    Private Sub Commandl_Click()
    Dim A1(4)As Integer,A2(4)As Integer
    For k:0 T0 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,Al(k+1)=Al(0+1)=A1(1)=2,A2(3-k)=A2(3-0)=A2(3)=2
    k=l,输入4,A1(k+1)=Al(1+1)=Al(2)=4,A2(3-k)=A2(3-1)=A2(2)=4
    k=2,输入6,A1(k+1)=Al(2+1)=A1(3)=6,A2(3-k)=A2(3-2)=A2(1)=6
    k=3,For循环结束,输出A2(k)的值即A2(3)的值,即2。
转载请注明原文地址:https://kaotiyun.com/show/YPQp777K
0

最新回复(0)