Hi

eine kurze Frage bei vb6 gab es ja mscomm und dieses OnComm event! wie läuft den das jetzt unter vb2008 mit diesem serialport?

Gruß Jommy

Hi!

Schon Google und die SuFu angestrengt?

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 Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If SerialPort1.IsOpen = TrueThenMsgBox("Offen")
ElseMsgBox("Close")
EndIfEndSub
EndClass