vc调用vb写的com接口函数,函数参数中有一函数指针,在vb中如何写.

Question

接口方法中有参数为函数指针(这个函数在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(随便起的名) 吗?

Answer 1

VB里没指针...我想到的办法是Public Function A() As String
 ...
End FunctionPrivate Function B() As String
 A()
End Function因为VB不是完全面向对象的..所以不清楚这样可以伐?A()不变Private Function B(Byref FunctionA As A) As StringEnd Function