问题
单项选择题
当发生Form_Click事件时，窗体上显示的第三行是( )。
Option Base 1
Private Sub Form_Click()
Dim i As Integer，j As Integer，k As Integer
Dim a(5，5)As Integer
For i=1 To 5
k=1
For i=1 To 5
If(i＜=j)Then
a(i,j)=k
k=k+2
Else
a(i,j)=k+1
End If
Next j
Next i
For i=1 To 5
For j=1 To 5
Print a(i,j)；
Next j
Print
Next i
End Sub
A．1 3 5 7 9
B．2 1 3 5 7
C．2 2 2 1 3
D．2 2 1 3 5
答案
参考答案：D
解析： 本题首先通过一个两层循环给5行5列的二维数组a的各个元素赋值，通过计算，不难得出二维数组各行的值。第一行的值为：1 3 5 7 9：第二行的值为：2 1 3 5 7；第三行的值为：2 2 1 3 5；第四行的值为：2 2 2 1 3；第五行的值为：2 2 2 2 1。然后再通过一个双层循环按行输出该数组，所以输出的第三行为：2 2 1 3 5。