![[单项选择题] 在窗体上画一个命令按钮Command1，然后编写如下代码： Private Sub Command1_Click() Dim Arr1(10) As Integer, Arr2(10)](http://www.mshxw.com/aiimages/31/257774.png "[单项选择题] 在窗体上画一个命令按钮Command1，然后编写如下代码： Private Sub Command1_Click() Dim Arr1(10) As Integer, Arr2(10)")
[单项选择题] 在窗体上画一个命令按钮Command1，然后编写如下代码：
Private Sub Command1_Click()
Dim Arr1(10) As Integer, Arr2(10)As Integer
n=3
For i = 1 To 5
Arr1 (i)=i
Arr2(n)=2 * n+i
Next i
Print Arr2(n); Art1 (n)
End Sub
运行程序后，单击命令按钮，输出结果是( )。
A) 11 3 B) 3 11 C) 13 3 D) 3 13
A. 11 3 B) 3 11 C) 13 3 D) 3 13
参考答案：
A问题解析:
本题使用For循环给数组Arr1、Art2的各个元素赋值， Art1的5个元素分别赋值为1、2、3、4、5：循环后i的值为5， Arr2(n)=2*n+i=11，因循环时n-直没有变化，因此，Arr2(n)=Arr2(3)。在窗体上输出时，Arr2(n)=Ad(3)=11 Arr1(n)=fur1(3)=3。
