如题所述
程序已经完成,请采纳:
Private Sub Command1_Click()
Dim a(3, 4) As Integer
For i = 1 To 3
For j = 1 To 4
a(i, j) = Int(10 + 90 * Rnd)
Print a(i, j);
Next j
Print
Next i
End Sub