added this to the vb program to poll the serial port input gave it a 235ms interval
Private Sub Timer1_Timer()
oldlogtext = SERIALINLOG.Text
serinput = MSComm1.Input
SERIALINLOG.Text = "Incoming Data: " + serinput + vbCrLf + oldlogtext
End Sub
added this to the vb program to poll the serial port input gave it a 235ms interval
Private Sub Timer1_Timer()
oldlogtext = SERIALINLOG.Text
serinput = MSComm1.Input
SERIALINLOG.Text = "Incoming Data: " + serinput + vbCrLf + oldlogtext
End Sub
Bookmarks