调用外部一个vc写的函数Declare Function VC_Seal Lib "seal.dll" () As Integer
现想实现以下的功能:直接调用VC_Seal函数,该函数会自动处理一些数据,如果函数返回值为-1,则说明一种情况,返回值为0,说明一种情况,返回值为正值,又说明一种情况。
程序具体该如何实现呢?
现想实现以下的功能:直接调用VC_Seal函数,该函数会自动处理一些数据,如果函数返回值为-1,则说明一种情况,返回值为0,说明一种情况,返回值为正值,又说明一种情况。
程序具体该如何实现呢?
解决方案 »
- vb Run-time error error '-214767259 (80004005)' ;Data provider or other service returned an E_FAIL status.Thanks for any suggest
- 恭喜yaqi(clear_zero)当版主
- (100分)excel问题,为什么创建的excel文件用VB打开是只读属性的。
- 在vb中如何通过ftp得到服务器上某个目录的文件列表
- 我实在不知道错在那????
- 调用别的可执行文件用ShellExecute2,如何传参数
- 有什么方法可以实现sendkeys "{Tab}"的功能
- 有关报表设计问题在于 100分
- 请问各位高手,在VB中如何用代码增加已经存在的数据表的字段?
- 我现在发现我不是一块编程的料!!!!!!!!
- 编译成EXE后无法运行
- VB调用DLL嵌套问题?
select case VC_Seal
case -1
....
case 0
.....
case >0
.....
end select
end sub
dim aVal as integer
aval=VC_Seal
select case aval
case -1
....
case 0
.....
case >0
.....
end selectlabel1=cstr(aval)
end sub