[填空题] 以下程序的作用是生成一个如下图的矩阵,该程序不完整,请补充完改程序。 Private Sub Command1_Click() Dim A(3,3) For M=1 To 3
11 查阅
[填空题] 以下程序的作用是生成一个如下图的矩阵,该程序不完整,请补充完改程序。
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
Next M
End Sub
参考答案: