UC知道初学VB问题
来源：百度知道 编辑：UC知道 时间：2024/05/30 09:50:03
Sub procmin(ByRef a() As Integer)
amin = a(0)
For i = 1 To 9
If amin > a(i) Then amin = a(i)
Next i
Print amin
End Sub
Private Sub Form_Click()
Dim a(9) As Integer
Randomize
For i = 0 To 9
a(i) = Int(Rnd() * 100 - 300)
Next i
Call procmin(a())
End Sub
在call procmin中,不是说括号内的必须是实际参数吗?为什么我不能写成call procmin(a(9))
不明白..新手来的,能讲浅白一点吗?
amin = a(0)
For i = 1 To 9
If amin > a(i) Then amin = a(i)
Next i
Print amin
End Sub
Private Sub Form_Click()
Dim a(9) As Integer
Randomize
For i = 0 To 9
a(i) = Int(Rnd() * 100 - 300)
Next i
Call procmin(a())
End Sub
在call procmin中,不是说括号内的必须是实际参数吗?为什么我不能写成call procmin(a(9))
不明白..新手来的,能讲浅白一点吗?
Sub procmin(ByRef a() As Integer)
这里定义这个过程时，用的是数组引用，所以调用的时候，只能传递数组名了，而a(9)只是一个数组变量了，不是数组名，如果你是定义的a()()二维数组，并且a(9)(。。。)是有的，那就可以用a(9)()了
因为你写的From_Clink函数是private类型的，这个函数里面的所有变量都是私有的，所有传a[9]实际上是没有用的。但是以指针形式传递的话就没有问题了