问题
单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Private Sub Command1_Click()
Dim i As Integer,j As Integer
Dim a(10, 10) As Integer
For i=1 To 3
For j=1 To 3
a(i，j)=(i-1)*3+j
Print a(i,j)；
Next j
Print
Next i
End Sub
程序运行后，单击命令按钮，窗体上显示的是______。
A) 1 2 3
2 4 6
3 6 9
B) 1 2 3
3 4 5
4 5 6
C) 1 2 3
2 5 8
3 6 9
D) 1 2 3
4 5 6
7 8 9
答案
参考答案：D
解析： 本题考查循环语句给二维数组赋值。Print方法用于把数组元素的值输出到窗体上，"；"表示以紧凑格式输出。跟踪程序：先定义一个二维数组，再将(i-1)*3+j的值赋给a(i，j)，由此可知，
i=1时：
a(1，1)=(1-1)*3+1=1；
a(1，2)=(1-1)*3+2=2；
a(1，3)=(1-1)*3+3=3；内循环结束，Print换行
i=2时：
a(2，1)=(2-1)*3+1=4；
a(2，2)=(2-1)*3+2=5；
a(2，3)=(2-1)*3+3=6；内循环结束，Print语句换行
i=3时：
a(3，1)=(3-1)*3+1=7；
a(3，2)=(3-1)*3+2=8；
a(3，3)=(3-1)*3+3=9；全部循环结束。