|
15精币
VB.net
Public Declare Function GT_GetSts Lib "gts.dll" (ByVal cardNum As Short, ByVal axis As Short, ByRef pSts As Integer, Optional ByVal count As Short = 1, Optional ByRef pClock As UInteger = Nothing) As Short
(注:pSts Integer 为32位带符号整数 pClock UInteger为无符号32位整数)
易语言
一.使用整数型,直接就是报错
.DLL命令 GT_GetSts, 整数型, "gts.dll", "GT_GetSts"
.参数 cardNum, 整数型
.参数 axis, 整数型
.参数 pSts, 整数型
.参数 count, 整数型
.参数 pClock, 整数型
二.使用长整数型
.DLL命令 GT_GetSts, 整数型, "gts.dll", "GT_GetSts"
.参数 cardNum, 整数型
.参数 axis, 整数型
.参数 pSts, 长整数型
.参数 count, 整数型
.参数 pClock, 长整数型
cardNum=0
axis=1
count=1
pSts&pClock为两个返回参数
Ret=GT_GetSts(cardNum,axis,pSts,count,pClock)
此时返回Ret=7(参数错误) Ret=0为正常执行指令
pSts返回值为0
说这么多其实我只想正确执行指令GT_GetSts()来获取pSts的值
也就是Ret返回值为0 pSts返回一个32位的整数
|
|