[填空题] 以下程序的作用是生成一个如下图的矩阵，该程序不完整，请补充完改程序。 Private Sub Command1

[填空题] 以下程序的作用是生成一个如下图的矩阵，该程序不完整，请补充完改程序。

Private Sub Command1_Click()

Dim A(3，3)

For M=1 To 3

For N=1 To 3

If N=M Or______Then

A(M，N)=1

Else

______=0

End If

Next N

Next M

For M=1 To 3

For N=1 To 3

Print A(M，N)；

Next N

Print

Next M

End Sub

N=3-M+1 A(M，N)