问题
单项选择题
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click()
Dim al(4，4)，a2(4，4)
For i=1 To 4
For j=1 To 4
a1(i，j)=i+j
a2(i，j)=al(i，j)+i+j
Next j
Next i
Print al(3，3)；a2(3，3)
End Sub
程序运行后，单击命令按钮，在窗体上输出的是
A．6 6
B．10 5
C．7 21
D．6 12
答案
参考答案：D
解析： 本题是对二重循环和二维数组的考查。题目程序通过一个二重循环给二维数组赋值，然后将a1(3，3)和a2(3，3)输出。注意分析，在对数组赋值时，a1(i,j)=i+j。 a2(i,j)=a1(i,j)+i+j=2*a1(i,j)。观察选项只有选项D满足这个条件，不需计算，可以直接判断选项D正确。