VB AxtiveX DLL的问题

我在AxtiveX DLL的类模块中写：

Public Function myFunction(ByVal i As Integer) As Integer
    MsgBox i
End Function

生成DLL

然后在EXE的窗口下写：

Dim obj As Object
Set obj = CreateObject("工程1.s2")

obj.myFunction(5)

生成EXE

然后测试，结果可以完成所有过程。

但是我换另一种函数

Public Function myFunction(ByVal i, As Integer,ByVal b, As Integer) As Integer
    MsgBox i & b
End Function

窗口代码：

Dim obj As Object
Set obj = CreateObject("工程1.s2")

obj.myFunction(5,3)

结果错误出现在窗口代码“obj.myFunction(5,3)”上。

系统报错：编译错误，缺少：=

如果变为obj.myFunction(5)，一个参数的话，编译就没问题，但是运行报错:需要参数

两个参数obj.myFunction(5,3)的话又没办法编译，

这该怎么办呢？有什么办法能传递两个或两个以上的参数？

obj.myFunction   5,3

VB在调用函数时,如果不使用它的返回值,那么应该省略调用 时的小括号

你加了小括号,所以就会提示你没有  =

 ---------------------------

Public Function myFunction(ByVal i As Integer) As Integer
    MsgBox i
End Function

这个函数只能接受一个有数，你用了　5，３说明是２个参数，运行不了，出错。

还有myFunction为integer，你的函数体内并没有返回值，所以怎么做都是0