Hi, ich hab zwar keine Antwort, aber mich würde interessieren, wo du die Segmentanzeigen in der unteren hälfet des Screenshots hast herbekommen hast, oder wie du sie gemacht hast.

P.S. hast du schon versucht das vbCrLf in der Zeile
Me.Text3 = Me.Text3 + GESRData & vbCrLf
wegzulassen?