填空题
【程序说明】下列程序用来在窗体上输出如图所示的数据。
Private Sub Form_Click 1
Dim a(5, 5) As Byte, i As Byte, j As Byte
For i = 1 To 5
For j = 1 To 6 - i
a(i, j) = （ ）
Next j, i
For i = 2 To 5
For j = （ ） To 5
a(i,j) = j + i - 6
Next j, i
For i = 1 To 5
For j = 1 To 5
Print a(i,j);
Next j
（ ）
Next i
End Sub