In VC++CPP文件:#define DLLEXPORT __declspec(dllexport) __stdcall#define Cname extern "C"typedef int (__stdcall *CBFUNC)(int);Cname int DLLEXPORT F(CBFUNC p){ return (*p)(10);}DEF文件:liBRARY DllTestEXPORTS FIn VBForm窗体:Option ExplicitPrivate Sub Command1_Click() CallTestEnd Sub模块文件:Option ExplicitPrivate Declare Function F _ lib "c:\DllTest.dll" ( _ ByVal rt As Long _) As LongPrivate Function CallBackTest(ByVal q As Long) As Long CallBackTest = q * 10End FunctionPublic Sub Calltest() MsgBox F(AddressOf CallBackTest)End Sub总结
以上是内存溢出为你收集整理的VB回调设置全部内容,希望文章能够帮你解决VB回调设置所遇到的程序开发问题。
如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)