Forum: Visual Basic |
Thema:
Re: Problem mit MSComm !!! |
Von:
Wolfgang Uhr (
23.05.2006 14:25) |
Hallo
Private Sub MSComm1_OnComm()
Dim Eingang As String
' Das hilft so nichts. Die Variable ist nicht initialisiert
' Daher
Eingang = TextBox.Text
Select Case MSComm1.CommEvent
Case comOverrun: MsgBox "Datenverlust!"
Case comRxOver: MsgBox "Datenverlust!"
Case comEvReceive: Eingang = Eingang + MSComm1.Input
End Select
TextBox.Text = Eingang
End Sub
Ich habe dir die zwei Stellen mal "falsch" in den Code eingefügt. Ich denke, dass du weißt, was zu tun ist.
Herzliche Grüße
Wolfgang
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!