Attribute VB_Name = "Module1"
' DLL Function prototypes
Public Declare Function OpenUsbPort Lib "CommUSB.dll" (ByVal byModel As Integer) As Integer
Public Declare Function WriteUSB Lib "CommUSB.dll" (ByVal byWrite As String, ByVal dwWrite As Long) As Long
Public Declare Function ReadUSB Lib "CommUSB.dll" (ByVal byWrite As String, ByVal dwWrite As Long) As Long
Public Declare Function CloseUsbPort Lib "CommUSB.dll" () As Integer


        
        


