SerialPort Daten empfangen bis CR und ins Label schreiben

[Auch Anfänger (Gast)]

Hallo zusammen,
ich bin geschafft. Ich habe ganz Google und Youtube quergelesen, jetzt 
blick ich garnicht mehr durch.

Mein Problem:
Von einem Messgerät bekomme ich nach Aufforderung durch mein VB-Program 
ein Datenpaket das 9 bis 12 Byte lang ist und mit CR abgeschlossen ist.

Ideal wäre es, wenn der Empfang der Daten auf CR getestet wird.
Doch wie mach ich das?

Um überhaupt mal Daten einzulesen hab ich mir folgende Programmzeilen 
zusammen gesucht:
'-----
Private Sub SerialPort1_DataReceived(ByVal sender As System.Object, 
ByVal _ e As System.IO.Ports.SerialDataReceivedEventArgs) Handles _ 
SerialPort1.DataReceived

Dim bytecount As Integer = SerialPort1.BytesToRead
Dim byteBuffer(bytecount) As Byte
ReDim byteBuffer(bytecount - 1)
SerialPort1.Read(byteBuffer, 0, bytecount) 'Buffer füllen bis Länge
main_display = System.Text.Encoding.ASCII.GetString _
(byteBuffer, 0, bytecount) 'Buffer in String wandeln
main_display = main_display.Replace(Chr(13), Nothing) 'RC entfernen

Control.CheckForIllegalCrossThreadCalls = False 'Wegen Threadwechsel
lblMain.Text = main_display 'Wert auf Label ausgeben
'-----

Hier wird weder auf CR getestet noch weiss ich nicht ob der 
Threadwechsel zum Anzeigen der Daten die "Feine englische Art" ist. Denn 
da gibt es was 'Invoke'. Nur wie mach ich das im Detail?

Ich bin in VB noch Anfänger und mir fehlen da doch einige Zusammenhänge.
Kann mir jemand helfen?
Vielen Dank!