Naja, mal das letzte Zeichen abrufen:

letzteszeichen = RIGHT(empfangenes, 1)

und dann eben prüfen:

If letzteszeichen = Endzeichen Then ...

EDIT: Sorry, zu spät gesehen, dass ja der String eh schon zeichenweise aufgebaut wird... is noch etwas früh...