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

问题单项选择题

当Form1_Click事件发生时，窗体上显示的第三行是( )。
Dim i As Integer，j As Integer，a(5，5) As Integer
For i=1 To 5
For j=1 To 5
If(i＜=j)Then
a(i,j)=1
Else
a(i,j)=0
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．0 0 0 1 1

B．0 0 1 1 1

C．0 1 1 1 1

D．1 1 1 1 1

答案

参考答案：B

解析：本题首先通过一个两层For循环给二维数组a的每一个元素赋初值，赋值的规律是左上右下对角线及该对角线的上半部分的元素赋值为1，该对角线的下半部分元素赋值为0。然后通过一个两层循环分行输出该二维数组，所以第三行为0 0 1 1 1。