level 1
Sunny__Lemon
楼主
是一个3*3的代码
Private Sub Form_Click()
Dim a(3, 3) As Integer
For i = 1 To 3
For j = 1 To 3
a(i, j) = Int(10 * Rnd)
Print a(i, j);
Next j
Print s
Next i
End Sub
我做出来总等于0
2020年05月17日 08点05分
1
Private Sub Form_Click()
Dim a(3, 3) As Integer
For i = 1 To 3
For j = 1 To 3
a(i, j) = Int(10 * Rnd)
Print a(i, j);
Next j
Print s
Next i
End Sub
我做出来总等于0