在窗体上画一个命令按钮Commandl,然后编写下列代码: Private Sub Commandl_Click() Dim Arrl(10)

在窗体上画一个命令按钮Commandl,然后编写下列代码： Private Sub Commandl_Click() Dim Arrl(10)As Integer,Arr2(10)As Integer n=3 For i=1 To 5 Arrl(i)=i Arr2(n)=2*n+1 Next i Print Arr2(n)；Arrl(n) End Sub 运行程序后，单击命令按钮，输出结果是A.11 3 B.3 11 C.13 3 D.3 13

A【解析】本题使用For循环给数组Arr1、Arr2的各个元素赋值，Arr1的5个元素分别赋值为1、2、3、4、5；循环后i的值为5，Arr2(n)=2*n+i=11，因为循环时n一直没有变化，因此，Arr2(n)=Arr2(3)。在窗体上输出时，Arr2(n)=Arr2(3)=11；Arr1(n)=Arr1(3)=3。