Hello,
I have the Arduino send values back to VB2010 and depending on the value, it will be displayed in a different label.
Below is my VB code:
Sub EventHandler(ByVal sender As Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived
Dim datareceived As Boolean = False
Dim recStr As String = ""
While Not datareceived
Dim recVal As Integer
recVal = SerialPort1.ReadByte()
If recVal = 10 Or recVal = 13 Then
datareceived = True
Else
recStr = recStr + Chr(recVal)
End If
End While
If recStr <> "" Then
If recStr > 1000 Then
recStr = recStr - 1000
Label10.Text = recStr
End If
If recStr > 100 And recStr < 1000 Then
recStr = recStr - 100
Label4.Text = recStr
End If
If recStr < 0 Then
recStr = recStr * (-1)
recStr = recStr - 10
Label8.Text = recStr
End If
If recStr > 0 And recStr < 10 Then
recStr = recStr
Label6.Text = recStr
End If
If recStr > 10 And recStr < 100 Then
recStr = recStr - 10
Label8.Text = recStr
End If
End If
End Sub
If I use a message box then the variable is displayed correctly. but when I try to display the variable on a label I get an error.
Anybody knows why??
Thanks for your help.
