Board logo

标题: 函数调用的问题 [打印本页]

作者: tkgg6034    时间: 2005-12-6 16:04     标题: 函数调用的问题

我写了一个排序的函数,并在标准模块里定义成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

oh, ah, WHAT?




欢迎光临 编程开发论坛 (http://bbs.lihuasoft.net/) Powered by Discuz! 6.0.0