vb demo中的定义方式
---------------------------
Public Declare Function SCardTransmit Lib "winscard.dll" (ByVal hCard As Long, _
pioSendRequest As SCARD_IO_REQUEST, _
ByRef SendBuff As Byte, _
ByVal SendBuffLen As Long, _
ByRef pioRecvRequest As SCARD_IO_REQUEST, _
ByRef RecvBuff As Byte, _
ByRef RecvBuffLen As Long) As Long
---------------------------
我在pb下修改成
---------------------------
Function Long SCardTransmit(Long hCard,SCARD_IO_REQUEST pioSendRequest,Ref any SendBuff,Long SendBuffLen,Ref SCARD_IO_REQUEST pioRecvRequest,Ref any RecvBuff,Ref Long RecvBuffLen) library "winscard.dll"
---------------------------
其中any,我换成char、long、blob等都不能正确返回,不知道有没有那位兄弟遇到过这个问题,帮忙看看。
------解决方案--------------------
似乎不行吧
------解决方案--------------------
似乎至少pb10里有个byte类型。没用过不知道是不是合适
FUNCTION ulong GetKeyboardState(ref Byte pbKeyState) LIBRARY "user32.dll"