vb SerialPort背后有一条消息

Question

我按照本教程创建了一个简单的SerialPort监视器：http://www.innovatic.dk/knowledg/SerialCOM/SerialCOM.htm

我期待15行以上的消息，然后是一秒钟的暂停，然后是另外15行消息等等。

Message 1, Line 1
Message 1, Line 2
Message 1, Line ...
Message 1, Line 14
Message 1, Line 15
.
.
(1 second pause)
.
.
Message 2, Line 1
Message 2, Line 2
Message 2, Line ...
Message 2, Line 14
Message 2, Line 15

问题是第一条消息的最后一行显示在第二条消息的开头：

Message 1, Line 1
Message 1, Line 2
Message 1, Line ...
Message 1, Line 14
.
.
(1 second pause)
.
.
Message 1, Line 15
Message 2, Line 1
Message 2, Line 2
Message 2, Line ...
Message 2, Line 14

这是我的代码：

Private Sub Receiver(ByVal sender As Object, _
    ByVal e As SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived
    Try
        Me.BeginInvoke(New StringSubPointer(AddressOf Display), SerialPort1.ReadLine)
    Catch ex As Exception
        MsgBox(ex.Message)
    End Try

End Sub

Private Sub Display(ByVal Buffer As String)
            RichTextBox1.AppendText(Buffer)
            RichTextBox1.ScrollToCaret()
End Sub

我该怎么做才能解决这个问题？

谢谢你， 布雷特