精华区 [关闭][返回]

当前位置:网易精华区>>讨论区精华>>编程开发>>● VB和Basic>>〓〓..各种开发技巧..〓〓>>系统和硬件操作>>请教,如何监测COM口?

主题:请教,如何监测COM口?
发信人: lg75()
整理人: winsy(2003-03-05 16:30:09), 站内信件
【 在 lwulon (wulon) 的大作中提到: 】
: 请教,如何监测COM口(公口)9根脚的电平状态变化?
你用Mscomm的话,就监测这些了。他们都对应一个引脚。
      Case comEvCD   ' CD 线状态变化。
      Case comEvCTS   ' CTS 线状态变化。
      Case comEvDSR   ' DSR 线状态变化。
      

Private Sub MSComm_OnComm ()
   Select Case MSComm1.CommEvent
   ' Handle each event or error by placing 
   ' code below each case statement

' 错误
      Case comEventBreak   ' 收到 Break。
       Case comEventCDTO   ' CD (RLSD) 超时。
      Case comEventCTSTO   ' CTS Timeout。
      Case comEventDSRTO   ' DSR Timeout。
      Case comEventFrame   ' Framing Error
      Case comEventOverrun   '数据丢失。
      Case comEventRxOver'接收缓冲区溢出。
      Case comEventRxParity' Parity 错误。
      Case comEventTxFull   '传输缓冲区已满。
      Case comEventDCB   '获取 DCB] 时意外错误

   ' 事件
      Case comEvCD   ' CD 线状态变化。
      Case comEvCTS   ' CTS 线状态变化。
      Case comEvDSR   ' DSR 线状态变化。
      Case comEvRing   ' Ring Indicator 变化。
      Case comEvReceive   ' 收到 RThreshold # of
chars.
      Case comEvSend   ' 传输缓冲区有 Sthreshold 个字符               
      '
                     '
      Case comEvEof   ' 输入数据流中发现 EOF 字符
                     ' 
   End Select
End Sub




--
※ 来源:.月光软件站 http://www.moon-soft.com.[FROM: 202.105.100.100]

[关闭][返回]