Private Sub Form_Load()
MSComm2.CommPort = 1 '选用com1串行口
MSComm2.Settings = "9600,n,8,1" '波特率9600,无奇偶校验位,8位数据位1位停止位
MSComm2.InputLen = 0 'input将读取接收缓冲区的全部内容
MSComm2.InBufferSize = 1024 '设置接收缓冲区的字节长度
MSComm2.InBufferCount = 0 '清除发送缓冲区数据
MSComm2.OutBufferCount = 0 '清除接收缓冲区数据
MSComm2.RThreshold = 1
MSComm2.PortOpen = True '打开通信口
End Sub'
Private Sub MSComm2_OnComm()
Dim LX    Select Case MSComm2.CommEvent
    Case comEvCD            'CD线的状态发生变化
      LX = 1
    Case comEvCTS           'CTS线的状态发生变化
      LX = 2
    Case comEvDSR           'DSR线的状态发生变化
      LX = 3
    Case comEvRing          'Ring Indicator变化
      LX = 4
    Case comEvReceive       '收到RThreshold # of
      
      LX = 5
    End SelectEnd Sub
以上程序在接收232串口数据的数据时正常,接收USB口数据时根本就不触发OnComm事件,在设置上有什么区别吗?