问题
单项选择题
在窗体上画一个命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command1 Click()
Dim Arr1(12)As Integer， Arr2(3)As Integer
Dim Sum As Integer
Sum = 2
For i=1 To 12
Arrl(i)= i
Next i
For i=1 To 3
Arr2(i)= Arrl(i*i)
Next i
For i = 1 To 3
Sum = Sum + Arr2(i)
Next i
Print Sum
End Sub
程序运行后，单击命令按钮，在窗体上的输出结果为
A．16
B．24
C．32
D．36
答案
参考答案：A
解析：
[分析]： 本题中定义了两个一维数组，分别为 Arr1和Arr2，由于使用了Option Base 1语句，因此其大小分别为10和3，接着执行3个For循环。在第1个循环中，对Arr1数组赋初值，每个元素的值与其下标相同，即Arrl(1)=1，Arrl(2)= 2……。在第2个循环中，为Arr2数组的3个元素赋值，这3个值分别为Arrl数组第1、3、9个元素的值，即Art2(1)=1、Arr2(2)=4、Arr2(3)= 9。在第3个循环中，计算数组Arr2中各元素的和，并将它赋给变量Sum。各元素的和为1+4+9= 14，但由于变量Sum的初值为2，因此最后的输出结果为16。