[填空題] 一下程序的作用是生成一個(gè)10×10的矩陣．該矩陣主對角線上的數(shù)據(jù)為1，其余數(shù)據(jù)為0(程序運(yùn)行結(jié)果如下圖所示)。該程序不完整，請補(bǔ)充完改程序。 Pr
2021-07-20
[填空題] 一下程序的作用是生成一個(gè)10×10的矩陣．該矩陣主對角線上的數(shù)據(jù)為1，其余數(shù)據(jù)為0(程序運(yùn)行結(jié)果如下圖所示)。該程序不完整，請補(bǔ)充完改程序。
Private Sub Command1_Click()
Dim a(10，10)As Integer
For i=1 To ______
For j=1 To 10
If______Then
______=1
Else
a(i，j)=0
End If
Next j
Next i
For i =1 To 10
For j=1 To 10
Print a(i，j)；
Next j
Next i
End Sub
正確答案：
10 i=j a(i，j)
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。