我在用mscomm控件编pc机与数采卡的串口通信,数采卡说明书上,通讯协议:被动查询。pc机发送ASCII字母“@00R”,数采卡就会返回数值。我编了以下程序,可是数采卡没反应,大家能帮我看下问题在哪里吗?
Private Sub Command1_Click()
Dim instring As String
Dim a As Variant
MSComm1.PortOpen = True
a = "@00R"
MSComm1.Output = a
10  DoEvents
If MSComm1.OutBufferCount >= 64 Then
instring = MSComm1.Input
Text1.Text = instring
End If
GoTo 10
End Sub
在mscomm属性上已经设定了commport和settings