![[填空题] 下面的程序代码执行之后，输出如下结果，请填写空白处将程序补充完整： Private Sub Command1_Click() Dim x(3,3) For i=1 To 3 For](http://www.mshxw.com/aiimages/31/251855.png "[填空题] 下面的程序代码执行之后，输出如下结果，请填写空白处将程序补充完整： Private Sub Command1_Click() Dim x(3,3) For i=1 To 3 For")
[填空题] 下面的程序代码执行之后，输出如下结果，请填写空白处将程序补充完整：
Private Sub Command1_Click()
Dim x(3,3)
For i=1 To 3
For j=1 To 3
If______Then x(i,j)=1
If______Then x(i,j)=-1
Next j
Next i
For i=1 To 3
For j=1 To 3
Print x(i,j);
Next j
______
Next i
End Sub
![[填空题] 下面的程序代码执行之后，输出如下结果，请填写空白处将程序补充完整： Private Sub Command1_Click() Dim x(3,3) For i=1 To 3 For](/uploadfile/member/20180926/1537964748.jpg "[填空题] 下面的程序代码执行之后，输出如下结果，请填写空白处将程序补充完整： Private Sub Command1_Click() Dim x(3,3) For i=1 To 3 For")
参考答案：
i＞=j；i＜j print问题解析:
本题考查打印矩阵。观察输出结果，矩阵对角线包括对角线下部为1，对角线上部为-1，因此对角线下部分矩阵的行标小于等于列标，体现在下标上就是i＞=j，上部分矩阵的行标大于列标i＜j。注意每输出矩阵的一行就输出一个回车。
