请填写下列空白以实现运行后形成一个主对角线上元素值为l，其他元素为0的6×6阶矩阵。 Private Sub Command1_Click() Dim s (6,6) For i=1 To 6 For i=1 To 6 If

admin2012-03-22 57

问题请填写下列空白以实现运行后形成一个主对角线上元素值为l，其他元素为0的6×6阶矩阵。
Private Sub Command1_Click()
Dim s (6,6)
For i=1 To 6
For i=1 To 6
If i=j Then
   _________
Else
   ___________
End If
Print  _________
Next j
Print
Next i
End Sub

选项

答案S(i,j)=1 S(i,j)=0 S(i,j)

解析

转载请注明原文地址:https://kaotiyun.com/show/E2hp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类