作者catxii (翻滾吧!!雞蛋)
看板Visual_Basic
標題[.NET] 請教程式碼
時間Wed Oct 26 17:13:02 2011
請輸入專案類型(網站專案或者應用程式專案)：
Public Sub CardControl()
Dim tempstr As String = String.Empty
Dim index As Integer = 0
For index = 0 To SendLen - 1
tempstr = tempstr + Microsoft.VisualBasic.Right("00"
,&Hex(SendBuff(index)),2) +" "
*必須是逗號 或是有效的運算式
Next
DisplayOut(tempstr, 3)
retCode = ModWinsCard.SCardControl(hCard,
ModWinsCard.IOCTL_CCID_ESCAPE_SCARD_CTL_CODE, SendBuff(0), SendLen,
RecvBuff(0), RecvLen, nBytesRet)
If retCode <> ModWinsCard.SCARD_S_SUCCESS Then
DisplayOut(ModWinsCard.GetScardErrMsg(retCode), 2)
Return retCode
*無法回傳值
End If
tempstr = String.Empty
For index = 0 To RecvLen - 1
tempstr = tempstr + Microsoft.VisualBasic.Right("00"
,&Hex(RecvBuff(index)),2) +" "
*必須是逗號 或是有效的運算式
Next
DisplayOut(tempstr, 4)
Return retCode
*無法回傳值
End Sub
可以請高手幫忙解題嗎....
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 203.64.128.29
1F：推 jwjeng:SendLen和RecvLen是什麼內容？ 0 嗎？ 10/26 22:47
2F：→ MOONRAKER:太深奧了，看不懂要解什麼。 10/27 12:00