[填空题] 执行下列程序后输出如下所示矩阵，填空将程序补充完整。 1 0 0 2 0 3 4 0 0 5 6 0 7 0 0 8 Private SubCommand1_Cli

[填空题] 执行下列程序后输出如下所示矩阵，填空将程序补充完整。 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 4If 【9】 Then 【10】 a(i，j)=k Elsea(i，j)=0 End If Print a(i，j)； Next i Print Next i End Sub