＋设为首页 ＋添加到收藏夹
Private Sub Command1_Click()
Dim min(1 To 4) As Integer
Dim max(1 To 4) As Integer
Dim a(1 To 4, 1 To 4) As Integer
Dim b(1 To 4, 1 To 4) As Integer
Dim z As Boolean
z = True
For i = 1 To 4
For j = 1 To 4
a(i, j) = Rnd() * 100 + 1
Print a(i, j),
If j = 4 Then
Print
End If
Next j
Next i
Print
这是我的一段程序代码，为什么我按F8 检查时它说“下标越界了”
在线等候，一定不吝啬分数！！！！！！
没错呀
Print a(i, j),
这句后面不该有,号吧。
我试了，没有问题
你再看看，可能是别的地方出问题了
我在我机子上运行了代码完全没有错！
请给出其它部分的代码！
不会吧，应该是对的。
是不是你的VB有问题呀，试了你的程序，没问题的
