VB取地址函数

阿杰

【声明】
Public Declare Function VarPtrArray Lib "msvbvm60.dll" Alias "VarPtr" (Var() As Any) As Long
Public Declare Function VarPtrStringArray Lib "msvbvm60.dll" Alias "VarPtr" (Var() As Any) As Long
-----------------------------------------------------------------
【函数】
取对象地址: ObjPtr
取OLE对象的地址: OLE_NAME.LpOleObject
取函数地址: AddressOf
取字符串地址: StrPtr
取变量地址: VarPtr
取数组变量地址: VarPtrArray
取字符串数组地址: VarPtrStringArray

Tesla.Angela

这代码坑爹啊。。。VARPTR是可以直接用的。。。
如果你要获得数组的首地址，传入array(0)即可。。。