执行下列程序后输出如下所示矩阵，填空将程序补充完整。
1 0 0 2
0 3 4 0
0 5 6 0
7 0 0 8
Private SubCommand1_Click（　）
Dim a(4，4)
For i=1 To 4
For i=1 To 4
If 【9】 Then
【10】
a(i，j)=k
Else
a(i，j)=0
End If
Print a(i，j)；
Next i
Print
Next i
End Sub

题库:计算机等级考试 类型:填空题 时间:2017-07-03 15:33:26 免费下载:《填空》Word试卷

执行下列程序后输出如下所示矩阵，填空将程序补充完整。
1 0 0 2
0 3 4 0
0 5 6 0
7 0 0 8
Private SubCommand1_Click（　）
Dim a(4，4)
For i=1 To 4
For i=1 To 4
If 【9】 Then
【10】
a(i，j)=k
Else
a(i，j)=0
End If
Print a(i，j)；
Next i
Print
Next i
End Sub

本题关键词:0-1法,0-苷,0－1评分法,0-1评分法,0-4评分法,0～Ⅳ型,0型面型,H-0变异,0级肌力,0型红细胞;