Hallo zusammen,
ich habe es nun endlich geschaft, das ich meinem µC Daten schicken kann. Das geht auch 1A und er Zeigt mir das was ich Sende auch auf dem LCD richtig an.
Sende ich aber nun vom µC Daten an den PC, dann Zeit mir die Textbox1 nur mist an.
Sende ich z.B. ASCII 49 zeigt er mir in der TextBox be jedem klick der Reihenfolge nach "4, 9 und dann nichts" an. Klicke ich weiter, geht es wieder bei "4" los.
Öffne ich aber ein Terminalprogramm, dann bekomme ich schön sauber die 49 angezeigt.
Hier der Code
Kann mir da jemand helfen bitte?
ich habe es nun endlich geschaft, das ich meinem µC Daten schicken kann. Das geht auch 1A und er Zeigt mir das was ich Sende auch auf dem LCD richtig an.
Sende ich aber nun vom µC Daten an den PC, dann Zeit mir die Textbox1 nur mist an.
Sende ich z.B. ASCII 49 zeigt er mir in der TextBox be jedem klick der Reihenfolge nach "4, 9 und dann nichts" an. Klicke ich weiter, geht es wieder bei "4" los.
Öffne ich aber ein Terminalprogramm, dann bekomme ich schön sauber die 49 angezeigt.
Hier der Code
Quellcode
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- Dim sChar As Byte
- SerialPort1.Write(1) 'Senden ASCII 49 an den µC
- sChar = SerialPort1.ReadByte() 'Sollte ASCII 49 empfangen
- TextBox1.Text = Chr(sChar) 'Sollte 49 in der TextBox1 ausgeben
- End Sub
Kann mir da jemand helfen bitte?