16,472
社区成员
发帖
与我相关
我的任务
分享Dll混合编程的小问题!
我在DLL中导出了这样2个函数
extern "C" __declspec(dllexport) long GetName(LPTSTR pChar)
extern "C" __declspec(dllexport) long Test(long *lngNewID)
在VB中这样声明
Private Declare Function GetName Lib "GeLock.dll" (ByVal sSN As String) As Long
Private Declare Function Test Lib "GeLock.dll" (ByRef lngNewID As Long) As Long
将相应的VB程序编译成可执行程序后,跟该dll放在一个目录下运行(或者直接在VC中调试VB程序)可以执行,但是直接在VB编译器中运行时会发生"实时错误49,Dll调用约定错误"
请问这是为什么?
extern "C" __declspec(dllexport) long GetName(LPTSTR pChar)
extern "C" __declspec(dllexport) long Test(long *lngNewID)
在VB中这样声明
Private Declare Function GetName Lib "GeLock.dll" (ByVal sSN As String) As Long
Private Declare Function Test Lib "GeLock.dll" (ByRef lngNewID As Long) As Long
将相应的VB程序编译成可执行程序后,跟该dll放在一个目录下运行(或者直接在VC中调试VB程序)可以执行,但是直接在VB编译器中运行时会发生"实时错误49,Dll调用约定错误"
请问这是为什么?
...全文
请发表友善的回复…
发表回复
Motolola 2003-08-29
- 打赏
- 举报
要使用__stdcall调用约定，默认的是__cdecl
hawk_js 2003-08-29
- 打赏
- 举报
看看
hawk_js 2003-08-21
- 打赏
- 举报
up
qqchen79 2003-08-20
- 打赏
- 举报
Change the function definition in your C source file:
extern "C" __declspec(dllexport) long __stdcall GetName(LPTSTR pChar)
extern "C" __declspec(dllexport) long __stdcall Test(long *lngNewID)
There is no way to solve the problem at VB side. If you can't change c source file, you have to write another dll as a wrapper.
extern "C" __declspec(dllexport) long __stdcall GetName(LPTSTR pChar)
extern "C" __declspec(dllexport) long __stdcall Test(long *lngNewID)
There is no way to solve the problem at VB side. If you can't change c source file, you have to write another dll as a wrapper.
