mscomm控件问题？

Question

我已经设为1了
With MSComm1
    .InBufferSize = 5120
    .CommPort = 1
    .Settings = "4800,N,8,1"
    .InputLen = 1
    .InputMode = comInputModeText
    .RThreshold = 1
end with

Answer 1

my code form load With MDIForm1.MSComm1
    .InBufferSize = 5120
    .CommPort = 1
    .Settings = "4800,N,8,1"
    .InputLen = 1
    .InputMode = comInputModeText
    .RThreshold = 1
    .PortOpen = True
    If err Then
        MsgBox "故障接收仪使用的端口无效 ,请另选端口 !", vbExclamation, "初始化端口失败 "
        MSComm1.PortOpen = False
        Exit Sub
    End If
End Withform 中button1
Dim buff As Variant
buff = "22821847"
MDIForm1.MSComm1.Output = buff

Answer 2

MSCOMM的发送和接收是在不同的缓冲区里面进行的，所以你发送的自己并收不到，所以不会产生ONCOMM事件，你试一下发送到别的端口，看是否会触发ONCOMM事件。

Answer 3

to daviddivad(你真行，居然比我还快！()嘿，你要不说，我还怀疑我的程序有问题呢，非得试到明天天亮！谢谢。