Declare Function comOpen Lib "comport.dll" (ByVal sPort As String) As Long
Declare Sub comClose Lib "comport.dll" (ByVal hComm As Long)
Declare Sub comConfigDlg Lib "comport.dll" (ByVal sPort As String)
Declare Function comGet Lib "comport.dll" (ByVal hComm As Long, ByVal sGet As _
  String) As Long
Declare Sub comSet Lib "comport.dll" (ByVal hComm As Long, ByVal sSet As _
String, ByVal nValue As Long)
Declare Sub comSend Lib "comport.dll" (ByVal hComm As Long, ByVal sSend As _
String) As Long
Declare Sub comReset Lib "comport.dll" (ByVal hComm As Long)
Declare Sub comSendLine Lib "comport.dll" (ByVal hComm As Long, ByVal sSend As _
  String)
Declare Function comReceiveLine Lib "comport.dll" (ByVal hComm As Long) As _
String
Declare Function comReceive Lib "comport.dll" (ByVal hComm As Long) As String