问题 单项选择题

在窗体上画一个名称为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。

单项选择题
单项选择题 案例分析题