小弟我有一台日晶的读卡机
以下是他附的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 可以看到全部内容