下列程序的功能是:把一维数组a的元素,每5个元素赋值给二维数组b的每一行。 Private SubCommand1_Click() Dim a(25)As Integer,b(5,5)As Integer For i=1 To 【10】 a(i)=Int(Rnd*25)Print a(i); Next i Print For i=1 To 5 For i=1 To 5b(i,j)= 【11】 Pr
主观题
下列程序的功能是:把一维数组a的元素,每5个元素赋值给二维数组b的每一行。 Private SubCommand1_Click() Dim a(25)As Integer,b(5,5)As Integer For i=1 To 【10】 a(i)=Int(Rnd*25)Print a(i); Next i Print For i=1 To 5 For i=1 To 5b(i,j)= 【11】 Pr