[单项选择题] 当发生Form

[单项选择题] 当发生Form

[单项选择题] 当发生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。