小弟我有一台日晶的讀卡機
以下是他附的VB範例程式
那要怎麼修改才能使他正常的工作呢
感激不盡


Option Explicit

'使用Module
'Private m_hConn As Long
'使用Class
Private m_dev As New LIBRFIDDEV
Private m_bIsConn As Boolean


Private Sub btnClear_Click()
lbOutput.Clear
End Sub

Private Sub btnOpen_Click()
If m_bIsConn Then
'LIBRFIDDEV_close (m_hConn)
'm_hConn = 0
Call m_dev.close_s
m_bIsConn = False
btnOpen.Caption = "Open"
Call lbOutput.AddItem("close connect", 0)
Else
'm_hConn = LIBRFIDDEV_open(tbConnName.Text)
'I ..

訪客只能看到部份內容，免費 加入會員 或由臉書 Google 可以看到全部內容