发表于:2003-11-24 13:36:00
1楼
1.
Private Sub MSComm1_OnComm()
Select Case MSComm1.CommEvent
Case comEvReceive
textReceive.Text = textReceive.Text & MSComm1.Input
End Select
End Sub
2. MSComm1.Output 为 write-only, 您必须在送出 data 前先作处理(记录/显示)
3. 您需另外设定 MSComm1.RThreshold = 1