急！急~请教一个计算机二级等级考试问题！

Question

----- 1 ----- ----- 2 ----- ----- 3 -----  为要填的内容。'PrintArray过程是输出一个右上三角元素（含对角线）为1，其余元素为0 的5×5矩阵Public Sub PrintArray()
Dim a(1 To 5, 1 To 5) As Integer
Dim i As Integer, j As Integer
For i = 1 To 5
    For j = 1 To 5
        If ----- 1 ----- Then
            ----- 2 -----
        End If
    Next j
Next i
For i = 1 To 5
    For j = 1 To 5
        Form1.Print " "; a(i, j);
    Next j
    ------ 3 -----
Next i
End Sub

Answer 1

1: i<j
2: a(i,j)=1
3: form1.print ""