当Form1_Click事件发生时，窗体上显示的第三行是( )。 Option

问题单项选择题

当Form1_Click事件发生时，窗体上显示的第三行是( )。
Option Base 1
Private Sub Form_Click()
Dim i As Integer，j As Integer
Dim k As Integer，a(5，5)As Integer
For i=1 To 5
k=1
For j=1 To 5
If i＜=j Then
a(i，j)=k
k=k+1
Else
a(i，j)=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 2 3 4 5

B．1 1 2 3 4

C．1 1 1 2 3

D．1 1 1 1 2

答案

参考答案：C

解析：本题首先定义了一个5行5列的数组，然后通过一个二重For循环给它的每个元素赋初值，赋值规律是左上右下对角线下面的元素值为1，该对角线上元素的值为1，该对角线上面的元素值在前一元素值的基础上增加1。接着通过一个两层For循环按行输出二维数组a，故输出的第三行为“1 1 1 2 3”。