I don't think vb is the problem. I have treid 3 different serial vb examples and all off them is the same, but here is the code
Private Sub Command2_Click()
MSComm1.Output = Text3.Text + vbCr
End Sub
Private Sub Form_Load()
MSComm1.PortOpen = True
End Sub
Private Sub Timer1_Timer()
Dim stemp As String
MSComm1.InputLen = 0
If MSComm1.InBufferCount Then
With frmMain
stemp = stemp + MSComm1.Input
List1.AddItem stemp
Text1.Text = stemp & vbCrLf
Text2.Text = stemp
End With
End If
End Sub
Johan
Bookmarks