[单项选择题] 当Form1

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