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

admin2016-12-13  22

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

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

最新回复(0)