题目内容
(请给出正确答案)
[主观题]
下列程序的功能是:把一维数组a的元素,每5个元素赋值给二维数组b的每一行。 Private SubComman
d1_Click() Dim a(25)As Integer,b(5,5)As Integer For i=1 To【 】 a(i)=Int(Rnd*25) Print a(i); Next i Print For i=1 To 5 For i=1 To 5 b(i,j)=【 】 Print b(i,j); Next j Print Next i End Sub
查看答案
如果结果不匹配,请 联系老师 获取答案