Question

vb模块调用

教科书里说的不是很详细，没几个例子，麻烦各位高手说明一下，怎么调用模块，是函数，不是子程序谢谢

Answer 1

函数与子程序调用方式一样，只是函数有反回值
比如调用整形函数F（x）时用：intV=F(x)就可以了。如果不关心反回值，数据传递在参数中进行，则可以与调用子程序一样：如函数F（x, y） as long中的X是传给函数的，y是计算结果，则可以用：CALL F（X，Y）来调用。也可以直接用 F X，Y的形式，前面无CALL 时，F后面的括号要去掉，即函数名+空格+变量1+逗号+变量2……。

模块只是存放函数、子程序的独立文件，当调用函数的语句不在同一模块中时，函数定义要用PUBLIC定义，在另一个模块或窗体中用INTV＝模块名.函数名（X，Y）调用，其中“模块名.”可以不要。

例：1
窗体中：
Private Sub Command1_Click()
Dim v As Long
Call F(5, v)
End Sub
模块中：
Public Function F(X As Long, Y As Long) As Boolean
Y = X * X
End Function

例2
窗体中：

Private Sub Command1_Click()
Dim v As Long
v = F(5, 7)
End Sub
模块中
Public Function F(X As Long, Y As Long) As Long
F = X * Y
End Function

Answer 2

VB中调用子程序时参数不要用括号括起，如
mysub a, b, c

而函数参数需用括号括起，如
value = myfunc (a, b, c)
如果你不需要函数的返回值，可以当作子程序调用，如
Call myfunc (a, b, c)