SerialPort DataReceived Event 会重复触发吗？

Question

假设只要有 100 个字节可用，我就从 SerialPort 读取数据，否则什么也不做。这意味着，串行端口缓冲区中的剩余数据仍然可用。此读取是在 DataReceived 的事件处理程序内完成的。

现在假设出现一种情况，例如 SerilaPort 缓冲区中有 50 个字节，但没有更多数据到来。据我了解，只要有一定数量的字节可用于从缓冲区读取，就会触发 DataReceived 事件。

现在，在给定的场景中，如果我从未读取过这 50 个字节，事件是否会因为这些未读字节的存在而被持续激活？

Answer 1

我确实发布了答案（参见上面的评论）。它在文档中。 “ ...当从 SerialPort 对象接收到数据时。”
OP 说“如果我从未读取过这 50 个字节，事件是否会因为这些未读字节的存在而被持续激活？”你回答说：“是的，它会一直触发，直到你调用 Read()。”

仅当收到新数据时才会触发该事件。如果不处理该数据，该数据将不会引发新事件。但是，如果有新数据到达，则会触发一个新事件，然后您可以处理所有数据。

Answer 2

是的，当有额外的字节进入时，它会继续触发，直到您调用 Read()。您可以使用 ReceivedBytesThreshold 属性来延迟该过程。这通常是一个坏主意，由于溢出错误而丢失一个字节可能会导致通信完全占用。自己在事件处理程序中缓冲您 Read() 的内容。

另请注意，这只是 Microsoft 串行端口驱动程序的已知行为。 SerialPort 类使用 WaitCommEvent API 函数，由驱动程序来实现它。特别是大量的 USB 驱动程序模拟串行端口，以便轻松连接到自定义设备，但它们的创建方式并不相同。

Answer 3

我认为这证明了我的观点，对 VB 代码感到抱歉。

Private Sub Button1_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) _
                          Handles Button1.Click
    'set up the com port for a test
    SerialPort1.PortName = "COM5" 'attached to breakout box with loopback
    SerialPort1.BaudRate = 115200 'some speed
    SerialPort1.Encoding = System.Text.Encoding.GetEncoding("windows-1252")
    Dim b() As Byte = New Byte() {42, 16, 20, 254, 255, 128} 'test data

    ctrcv = 0 'counter
    SerialPort1.Open() 'open the port
    Debug.WriteLine(DateTime.Now.ToString("HH:mm:ss.ffff")) 'show time
    SerialPort1.Write(b, 0, b.Length) 'write the test data

    'give the DataReceived event handler chances to fire
    Threading.Thread.Sleep(30000)

    'show the last time it fired and how many times
    Debug.WriteLine(lastRCV.ToString("HH:mm:ss.ffff") & " " & ctrcv)
    'show how many are available to read
    Debug.WriteLine(DateTime.Now.ToString("HH:mm:ss.ffff") & " " & SerialPort1.BytesToRead)
    Array.Clear(b, 0, b.Length)
    SerialPort1.Read(b, 0, SerialPort1.BytesToRead) 'read them

    SerialPort1.Close() 'close the port
    Stop
End Sub
Dim ctrcv As Integer = 0, lastRCV As DateTime
Private Sub SerialPort1_DataReceived(ByVal sender As System.Object, _
                                     ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) _
                                     Handles SerialPort1.DataReceived
    ctrcv += 1
    lastRCV = DateTime.Now
End Sub

调试输出

 09:34:11.3241 <- when the test started
 09:34:11.3642 3 <- the last data received event!, and how many events
 09:34:41.3718 6 <- when the test ended