Καλημέρα,
προσπαθώ να φτιάξω μια ρουτίνα που να διαβάζει απο την com port του PDA που είναι συνδεδεμένο το GPS, με τον παρακάτω κώδικα:
Dim
com As New System.IO.Ports.SerialPort()
Dim data As String = ""
com.PortName =
"COM1"
com.BaudRate = 9600
com.Open()
If com.IsOpen = True Then
txt.Text =
"open"
Try
Dim numBytes As Integer = com.BytesToRead
Dim buffer As Byte() = New Byte(numBytes - 1) {}
com.Read(buffer, 0, numBytes)
data = Encoding.GetEncoding(
"ASCII").GetString(buffer, 0, numBytes)
txt.Text =
"++" & data
Catch ex As System.IO.IOException
MsgBox(ex.Message)
Finally
'txt.Text = "close"
com.Close()
End Try
Else
txt.Text =
"no com found"
com.Close()
End If
αλλά δεν γυρίζει τίποτα.
υπάρχει κάτι λάθος στον κώδικα;
ευχαριστώ και πάλι