vc调用vb写的com接口函数,函数参数中有一函数指针,在vb中怎么写

vc调用vb写的com接口函数,函数参数中有一函数指针,在vb中如何写.
接口方法中有参数为函数指针(这个函数在vc中实现)

以下为vb   接口函数定义
Public   Sub   setGUIButton(ByVal   vWinHandle   As   Long,   ByVal   vstrBtn1Text   As   String,   ByVal   vstrBtn2Text   As   String,   ByVal   _
      vstrBtn3Text   As   String,   ByVal   vstrBtn4Text   As   String,   参数---传递一个函数指针)


最后一个参数不知道怎么写,是ByRef   functionA(随便起的名)   吗?

------解决方案--------------------
VB里没指针...

我想到的办法是

Public Function A() As String
...
End Function

Private Function B() As String
A()
End Function

因为VB不是完全面向对象的..所以不清楚这样可以伐?

A()不变

Private Function B(Byref FunctionA As A) As String

End Function
------解决方案--------------------
addressof functionA