问题
单项选择题
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:
Option Base 1
Private Sub Command1_Click()
Dim a(3,3)
For i=1 To 3
For j=1 To 3
If i=j Then a(i,j)=1
If i<j Then a(i,j)=2
If i>i Then a(i,j)=3
Next j
Next i
For i=1 To 3
For j=1 To 3
Print a(i,j);
Next j
Print
Next i
End Sub
程序运行后,如果单击命令按钮,则在窗体上输出的内容为 ______。
A.1 3 3
B.1 2 2
C.2 3 3
D.2 1 1
2 1 3 3 1 2 1 2 3 3 2 1
2 2 1 3 3 1 1 1 2 3 3 2
答案
参考答案:B
解析:[评析] 本题程序在过程中定义了一个二维数组,该数组可容纳9个元素,在循环中给数组元素赋值,在每次循环中有If i=j Then a (i,j)=1,表示主对角线置1;If i<j Then a(i,j)=2,表示主对角线以上元素置2;If i> j Then a(i,j)=3,表示主对角线以下元素置3。