[单项选择题] 在窗体上画一个命令按钮Command1，然后编写如下代码： Private Sub Command1_Click() Dim Arr1(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。