VB6.0中，通訊控制元件在“工程” ――“部件”,選中 Microsoft Comm Control6.0

其檔案為 mscomm32.ocx

該控制元件唯一的一個事件就是OnComm事件。隨著CommEvent屬性值的變化，其後的Case程式程式碼便被引發。如此就是自動檢測了。（區別於定時檢測）

On comm事件中

Select case mscomm1.CommEvent

CasecomEvCD‘CD線的狀態發生變化

If mscomm1.CDHolding then‘如果DCD腳位電位為高

Else

….

End if

CasecomEvCTS‘CTS線的狀態發生變化

CasecomEvDSR‘DSR

Case comEvRing‘Ring Indicator 變化

CasecomEvReceive ‘收到最小接受字元數個字元

CasecomEvSend‘傳輸緩衝區有最小傳輸字元數個字元

CasecomEvEOF‘輸入資料流中發現EOF 字元

End Select