mscomm的问题：怎样通过文本框的输入来发送十六进制数？

[humanwal]

程序片断：
Private Sub CmdSend_Click()
Dim a(2) As Byte
a(0) = &HFC
a(1) = Trim(txtSend.Text)
a(2) = &H40
Comm1.Output = a
End Sub

Private Sub Timer1_Timer()
If Comm1.InBufferCount > 0 Then
txtReceive.Text = txtReceive.Text + Comm1.Input
End If
End Sub

为什么老是有错？inputmode应该是0还是1？

[刘洪峰AIoT]

你发送的时候，好像用二进制方式发送，而接收的时候却希望他是字符方式，你最好统一

[zou19820704]

接收的时候我也建议最好是comInputModeBinary，这样双方能统一