我写了一个排序的函数,并在标准模块里定义成public
但是在过程调用时,提示byref参数错误
函数的原形是:
Public Sub danxu(text As String, szxu() As fs, n As Integer)
Dim g As Integer
Dim i As Integer
g = gesuo(text)
ReDim szxu(g) As fs
For i = n To g - 2
ReDim Preserve szxu(i) As fs
szxu(i) = szxu(i + 1)
Next i
ReDim Preserve szxu(UBound(sz) - 1) As fs
End Sub
过程的原形是:
call danxu(text1.text,sz(),m)
请班主说明一下,道底哪错了
应该怎么办啊 作者:
Nothing 时间: 2005-12-6 20:54
call danxu(text1.text,sz(),m)
这句有问题
必需定义sz和值,即必需这样
Dim sz() As fs
Dim m As Integer
才能使用
call danxu(text1.text,sz(),m) 作者:
Breanna6998 时间: 2005-12-25 16:52 标题: Confusion