填空题

请在下列空白处填入合适的语句，以实现运行后形成一个主对角线上元素值为1，其他元素为0的6x6阶矩。
Private Sub Command1_Click()
Dim s(6,6)
For i=1 To 6
For i=1 To 6
If i=i Then
(13)
Else
(14)
End If
Print (15)
Nexti
Print
Next i
End Sub

【参考答案】

[13]s(i，j)=1[14]S(i，j)=0[15]S(i，j)
<上一题 目录 下一题>
热门 试题

填空题
下面程序运行的结果如下： 1 11 12 21 22 23 31 32 33 34 请在画线处填上适当的内容，将程序补充完整。 Private Sub Form_Click() Call (10) End Sub Private Sub p16() For I=1 to 4 For i=1 to I a= (11) Print Tab((j-1)*5+1);a; Next i Print Next I End Sub
填空题
关系表达式X≤-5或X≥5所对应的布尔表达式是 (12) 。
相关试题