一个在VB中调用VC制作的DLL的奇怪的问题!!

yanhao_china 2002-11-27 08:45:15
函数在VC中的声明:

#ifndef _SecureClient_h_
#define _SecureClient_h_

#ifdef _USRDLL
#define SECURE_DLL extern "C" __declspec( dllexport )

#else

#ifdef __cplusplus
#define SECURE_DLL extern "C"
#else
#define SECURE_DLL
#endif

#endif

SECURE_DLL int ClientVerify( );
SECURE_DLL void SetServerIP( char* pstrIP );

#endif




在VB工程中的声明和调用:

Private Declare Function ClientVerify Lib "E:\工作项目\项目程序\基于web应用的身份认证\vb\WebSecure_Client.dll" () As Long
Private Declare Sub SetServerIP Lib "E:\工作项目\项目程序\基于web应用的身份认证\vb\WebSecure_Client.dll" (ByVal strIP As String)

Private Sub Command1_Click() Dim result As Long
Dim strIP
strIP = "192.168.0.176"
SetServerIP (strIP)
result = ClientVerify()
MsgBox result


End Sub

结果是此DLL在VC中调用正常,但是到了VB中调用的时候发现函数ClientVerify()没有参数可以正常调用,函数的返回值也是正确的。但是函数SetServerIP()调用就有问题,请指教!!
...全文
29 3 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
crystal_heart 2002-11-29
  • 打赏
  • 举报
回复
CTRL+F5
cacoda 2002-11-28
  • 打赏
  • 举报
回复
SetServerIP (strIP)这句话在VB中不报错,但是参数没有传入,正确的为
call SetServerIP (strIP)

SetServerIP strIP
zyl910 2002-11-27
  • 打赏
  • 举报
回复
加上_stdcall

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧