kleine VB Frage:

[Max Mustermann]

Danke für die schnelle Antwort... aber, wo schreib ich das hinein?ß Ins haupt Form?? Da kommt dann die Fehlermeldung: End Sub erwartet... obwohl end sub eh da steht.

Gleich noch eine kleine Frage Ich möchte, dass ein Shape bei MsComm1.input = "C" seine Farbe von Schwarz auf Rot ändert... wie geht denn das?

Ich dachte das geht so:

e$ = MSComm1.Input
Text1.Text = Text1.Text + e$

If Left$(e$, 1) = "C" Then
Shape1.FillColor = &HFF&
Else
Shape1.FillColor = &H0&
End If

tut es aber nicht