主题：串口接收

用串口调试助手给foxtable发数据,用Dim cnt As Integer = Ports("COM2").BytesToRead得到的字节数对,第二次,第三次再接收就不对了,波特率为38400,字节数34,除第一次正确,以后都是8,不知错在那里

代码在 DataReceived 事件事件里,用的是字节接收帮助里的例程

 

我换台机子式式

 

 

换台机子还一样.两端都用串口助手,同样的波特率互发都没问题.

下面是DataReceived事件的代码

 

Dim cnt As Integer = Ports("COM1").BytesToRead

If cnt > 0 Then '缓冲区是否有数据
        Ports("COM1").Read(sj,0,cnt)
End If

Vars("bz") = 1 + Vars("bz")
Vars("len") = cnt

 

这是初始化代码

Ports.Add("COM1")
With Ports("COM1")
    .Close()
    .Parity = Parity.None
    .Handshake = Handshake.None
    .StopBits = StopBits.One
    .BaudRate = 38400
    .DataBits = 8
    .ReadBufferSize() = 4096
    .WriteBufferSize() = 2048
    .Open
End With

 

sj(0 to 127) 在全局BYTE的数组变量

 

我测试了一下，当接收的字节大于8个就出问题了，例如接收22个字节，cnt为6，而不是22，

cnt = 6 好像是 22 - 2*8 得到的 也就是串口接收只能接收小于8个字节的字节流，请问如何解决。