OnComm + VB2008
- VB.NET
Sie verwenden einen veralteten Browser (%browser%) mit Sicherheitsschwachstellen und können nicht alle Funktionen dieser Webseite nutzen.
Hier erfahren Sie, wie einfach Sie Ihren Browser aktualisieren können.
Hier erfahren Sie, wie einfach Sie Ihren Browser aktualisieren können.
Es gibt 2 Antworten in diesem Thema. Der letzte Beitrag () ist von JimmyJo22.
-
-
-
Ja hab da was gefunden denke das könnte passen kann im moment nur nicht testen!
PublicClass Form1
PrivateWithEvents mySerialPortObj As IO.Ports.SerialPort
PrivateSub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.LoadWith SerialPort1
.BaudRate = 9600
.PortName = "COM1"
EndWith
EndSubPrivateSub mySerialPortObj_DataReceived(ByVal sender AsObject, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles mySerialPortObj.DataReceived
Dim newLine AsString = Serialport1.ReadlineMe.Invoke(New SetTextBoxDgt(AddressOf SetTextbox1), NewObject() {newLine})
EndSubPrivateDelegateSub SetTextBoxDgt(ByVal text AsString)
PrivateSub SetTextbox1(ByVal text AsString)Me.Textbox1.Text = text
EndSubPrivateSub