取出函數位址指派給阻件的屬性

小弟不熟VB , 但是有特殊上的需要在其它語言使用 , 我想將 VB 自定的函數
將它把位址取出 , 但是 AddressOf 老是出錯 , 我想將位址取出後指派給
COM 組件的屬性 , 不知這樣是否可以 ?ex:
Public Sub Form_Load() Dim obj As Object
 Set obj = CreateObject("CodeGuru.FastAddition")
 
 //不知要何才能取出 Form_Load2 位址 ? 
 obj.pdisp(10.5, 20.6) = FnPtrToLong(AddressOf Form_Load2) 
 
End Sub//自定義函數
Public Sub Form_Load2()End SubFunction FnPtrToLong(ByVal lngFnPtr As Long) As Long
     FnPtrToLong = lngFnPtr
End Function
感激不盡!! 真的蠻急的~~ 對於懂 VB的人來說可能覺得問的很點點點 , 請見諒~