![[填空题] 以下程序的作用是生成一个如下图的矩阵，该程序不完整，请补充完改程序。 Private Sub Command1_Click() Dim A(3，3) For M=1 To 3 F](http://www.mshxw.com/aiimages/31/248524.png "[填空题] 以下程序的作用是生成一个如下图的矩阵，该程序不完整，请补充完改程序。 Private Sub Command1_Click() Dim A(3，3) For M=1 To 3 F")
[填空题] 以下程序的作用是生成一个如下图的矩阵，该程序不完整，请补充完改程序。 ![[填空题] 以下程序的作用是生成一个如下图的矩阵，该程序不完整，请补充完改程序。 Private Sub Command1_Click() Dim A(3，3) For M=1 To 3 F](/uploadfile/member/20180926/1537963537.jpg "[填空题] 以下程序的作用是生成一个如下图的矩阵，该程序不完整，请补充完改程序。 Private Sub Command1_Click() Dim A(3，3) For M=1 To 3 F")
Private Sub Command1_Click() Dim A(3，3) For M=1 To 3 For N=1 To 3 If N=M Or 【7】 Then A(M，N)=1 Else 【8】 =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
参考答案：
[7]N=3-M+1 [8] A(M，N)问题解析:
解析无
