问题 单项选择题

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

解析:

[评析] 程序共有两层循环,每执行完一次内循环,则打印换行,当外层循环执行第一次时,a(i,j)=(i-1)*3+j相当于a(1,j)=j,由此判断选项A,D可能正确,当外层循环执行第二次时,a(i,j)=(i-1)*3+j,相当于a(2,j)=3+j,由此可判断选项D为正确答案。

填空题
单项选择题