问题
单项选择题
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:
Private Sub Command1_Click()
Dim i As Integer,j As Integer
Dim a(10, 10)As Integer
For i=1 To 3
For i=1 To 3
a(i,j)=(i-1) *3+j
Print a(i,j);
Next i
Print
Next i
End Sub
程序运行后,单击命令按钮,窗体上显示的是
A.1 2 3
246
3 69
B.2 3 4
3 4 5
4 5 6
C.1 4 7
2 5 8
3 6 9
D.1 2 3
4 5 6
7 8 9
答案
参考答案:D
解析: 本题仍然是使用For循环对二维数组赋值。由于有For,循环的嵌套,当i等于1时,Forj循环执行三次,根据“a(i,j)=(i-1)*3+j”可知输出的数值为1、2、3。此时For j循环终止,并执行“Print”语句,即进行换行。然后再执行For i的第二次循环,以此类推,正确答案为D。