有一文件AAA.dll中有一函数,该函数的标准C语言原型为:
int __stdcall Startup(char* cLocalIp,
short iLocalPort,
char* cSmgIp,
short iSmgPort,
char* cLoginName,
char* cPassword,
int lSocketTimeOut,
int lMTTimeOut,
unsigned int iSrcNode,
int lMTThread,
int lMaxListNode,
int lMTMaxRetryTime,
int lMOThread)我想在用VB做一个DLL文件,调用此函数,我是这样声明的:
Declare Function Startup Lib "AAA.dll" (ByVal cLocalIp As Byte,
ByVal iLocalPort As Integer,
ByVal cSmgIp As Byte,
ByVal iSmgPort As Integer,
ByVal cLoginName As Byte,
ByVal cPassword As Byte,
ByVal lSocketTimeOut As Long,
ByVal lMTTimeOut As Long,
ByVal iSrcNode As Long,
ByVal lMTThread As Long,
ByVal lMaxListNode As Long,
ByVal lMTMaxRetryTime As Long,
ByVal lMOThread As Long) As Long然后我这样去调用它:
Public Function Start() As Long Start = Startup("192.16.1.1", 8801, "192.16.1.2", "8802", "aaa", "bbb", 120, 120, 3037188888#, 50, 30, 5, 0)End Function总是有编译错误:错误的参数号或无效的属性赋值 提示出错在Start = Startup("192.16.1.1", 8801=========== 这行
我实在找不出为什么了,请大家帮我看一下,探讨一下解决这个问题,谢谢!!!
我急着用,在线等!!!!!!!!!!!!!!!
int __stdcall Startup(char* cLocalIp,
short iLocalPort,
char* cSmgIp,
short iSmgPort,
char* cLoginName,
char* cPassword,
int lSocketTimeOut,
int lMTTimeOut,
unsigned int iSrcNode,
int lMTThread,
int lMaxListNode,
int lMTMaxRetryTime,
int lMOThread)我想在用VB做一个DLL文件,调用此函数,我是这样声明的:
Declare Function Startup Lib "AAA.dll" (ByVal cLocalIp As Byte,
ByVal iLocalPort As Integer,
ByVal cSmgIp As Byte,
ByVal iSmgPort As Integer,
ByVal cLoginName As Byte,
ByVal cPassword As Byte,
ByVal lSocketTimeOut As Long,
ByVal lMTTimeOut As Long,
ByVal iSrcNode As Long,
ByVal lMTThread As Long,
ByVal lMaxListNode As Long,
ByVal lMTMaxRetryTime As Long,
ByVal lMOThread As Long) As Long然后我这样去调用它:
Public Function Start() As Long Start = Startup("192.16.1.1", 8801, "192.16.1.2", "8802", "aaa", "bbb", 120, 120, 3037188888#, 50, 30, 5, 0)End Function总是有编译错误:错误的参数号或无效的属性赋值 提示出错在Start = Startup("192.16.1.1", 8801=========== 这行
我实在找不出为什么了,请大家帮我看一下,探讨一下解决这个问题,谢谢!!!
我急着用,在线等!!!!!!!!!!!!!!!
Declare Function Startup Lib "AAA.dll" (ByVal cLocalIp As String, ByVal iLocalPort As Long, ByVal cSmgIp As String, ByVal iSmgPort As String, ByVal cLoginName As String, ByVal cPassword As String, ByVal lSocketTimeOut As Long, ByVal lMTTimeOut As Long, ByVal iSrcNode As Double, ByVal lMTThread As Long, ByVal lMaxListNode As Long, ByVal lMTMaxRetryTime As Long, ByVal lMOThread As Long) As Long
我来试试!!不容易呀,终于有一解答的了!!!!!!!!!!!!
谢谢!!!!!!!!!!!!!!!!!!!!
Start = Startup("192.16.1.1", 8801, "192.16.1.2", "8802", "aaa", "bbb", 120, 120, 3037188888#, 50, 30, 5, 0) 错误的参数号或无效的属性赋值
Start = Startup("192.16.1.1", 8801, "192.16.1.2", "8802", "aaa", "bbb", 120, 120, 3037188888#, 50, 30, 5, 0)错误的参数号或无效的属性赋值
Declare Function Startup Lib "AAA.dll" (ByVal cLocalIp As Byte, _
ByVal iLocalPort As Integer, _
ByRef cSmgIp As String, _
ByVal iSmgPort As Integer, _
ByRef cLoginName As String, _
ByRef cPassword As String, _
ByVal lSocketTimeOut As Long, _
ByVal lMTTimeOut As Long, _
ByVal iSrcNode As Long, _
ByVal lMTThread As Long, _
ByVal lMaxListNode As Long, _
ByVal lMTMaxRetryTime As Long, _
ByVal lMOThread As Long) As Long
Declare Function Startup Lib "AAA.dll" (ByRef cLocalIp As String, _
ByVal iLocalPort As Integer, _
ByRef cSmgIp As String, _
ByVal iSmgPort As Integer, _
ByRef cLoginName As String, _
ByRef cPassword As String, _
ByVal lSocketTimeOut As Long, _
ByVal lMTTimeOut As Long, _
ByVal iSrcNode As Long, _
ByVal lMTThread As Long, _
ByVal lMaxListNode As Long, _
ByVal lMTMaxRetryTime As Long, _
ByVal lMOThread As Long) As Long
改为:
Start = Startup("192.16.1.1", 8801, "192.16.1.2", 8802, "aaa", "bbb", 120, 120, 3037188888#, 50, 30, 5, 0)
ByVal iLocalPort As Integer, _
ByRef cSmgIp As String, _
ByVal iSmgPort As Integer, _
ByRef cLoginName As String, _
ByRef cPassword As String, _
ByVal lSocketTimeOut As Long, _
ByVal lSocketTimeOut As Long, _
ByVal iSrcNode As Long, _
ByVal lMTThread As Long, _
ByVal lMaxListNode As Long, _
ByVal lMTMaxRetryTime As Long, _
ByVal lMOThread As Long) As Long
ByVal iLocalPort As Integer, _
ByRef cSmgIp As String, _
ByVal iSmgPort As Integer, _
ByRef cLoginName As String, _
ByRef cPassword As String, _
ByVal lSocketTimeOut As Long, _
ByVal lSocketTimeOut As Long, _
ByVal iSrcNode As Long, _
ByVal lMTThread As Long, _
ByVal lMaxListNode As Long, _
ByVal lMTMaxRetryTime As Long, _
ByVal lMOThread As Long) As Long
short iLocalPort, ---->Integer
char* cSmgIp,--->String
short iSmgPort,--->Integer
char* cLoginName,--->String
char* cPassword,--->String
int lSocketTimeOut,--->long
int lMTTimeOut,--->long
unsigned int iSrcNode,--->Ingeger
int lMTThread,--->long
int lMaxListNode,--->long
int lMTMaxRetryTime,--->long
int lMOThread)--->long
(ByVal cLocalIp As String, _
ByVal iLocalPort As Integer, _
ByVal cSmgIp As String, _
ByVal iSmgPort As Integer, _
ByVal cLoginName As String, _
ByVal cPassword As String, _
ByVal lSocketTimeOut As Long, _
ByVal lMTTimeOut As Long, _
ByVal iSrcNode As Long, _
ByVal lMTThread As Long, _
ByVal lMaxListNode As Long, _
ByVal lMTMaxRetryTime As Long, _
ByVal lMOThread As Long) As Long