单选题 在窗体上添加一命令按钮,其名为Command1,然后编写代码如下:

private Sub Command1_Click()

Dim an(5) As Integer,arrl(5) As Integer

n=3

For i=1 To 5

arr(i)=i

arrl(n)=2*n+i

Next

Print arrl(n);arr(n)

End Sub

程序的运行结果为


【正确答案】 B
【答案解析】[解析] 在给数组赋值时,如果每次都是赋给数组中同一个成员,那么后面的赋值将覆盖以前的值。