填空题

下面程序段实现单击命令按钮Command1时输出如下结果：
1 -1 -1
1 1 -1
1 1 1
该程序不完整，请填空。
Private Sub Command1_Click()
Dim X(3,3)
For I=1 to 3
For J=1 To 3
If (14) Then
X(I，J)=1
End If
IfI＜J Then
X(I,J)=-1
End If
Next J
Next I
For I=1 To 3
For J=1 To 3
Print X(I,J)
Next J
Print
Next I
End Sub

点击查看答案&解析