主题：串口数据传递问题

1、msgbox(cnt)

 

2、http://www.foxtable.com/help/topics/1967.htm

 

我发现运行这个命令调试显示是18，但我抓包是fe fe 68 00 21 13 00 80 13 68 81 04 44 e9 c8 54 65 16,我用其他串口调试器显示也为以上数据。是18字节，我估计是取数错误了，有没有办法取到正确的18字节的数据

 对你无语。18是长度，11楼的是显示长度。

 

 获取值以后，循环取出。

 

Dim cnt As Integer = Ports("COM1").BytesToRead
If cnt > 0 Then '缓冲区是否有数据
    Dim rval(cnt - 1) As Byte
    Ports("COM1").Read(rval,0,cnt)

    For each r As byte in rval

        msgbox(r)

    Next
End If