Hallo,
ich habe seit neusten einen Arduino. Habe eine kleine Ampel gebaut. Kann dessen Status (rot, gelb, grün) auch über eine VB Applikation abfragen, jedoch gelingt es mir nicht Zahlen bzw. -folgen an den Arduino zu senden, die der Arduino dann in Befehle auswerten soll(zB. die Ampel über den Computer schalten)
Connect:
Status Abfrage:
So und jetzt das Problemkind
Ich kann nicht mal den Button teilweise anklicken oder das Fenster verschieben, als wie wenn das Programm eingefroren wäre aber die Abfragen werden weiterhin ausgeführt.
Also fakt ist: Kann Programm nicht anklicken oder bedienen & die Nachricht wird nichtmal gesendet.
Was ist das Problem?
Gruss
Matze396
ich habe seit neusten einen Arduino. Habe eine kleine Ampel gebaut. Kann dessen Status (rot, gelb, grün) auch über eine VB Applikation abfragen, jedoch gelingt es mir nicht Zahlen bzw. -folgen an den Arduino zu senden, die der Arduino dann in Befehle auswerten soll(zB. die Ampel über den Computer schalten)
Connect:
Status Abfrage:
VB.NET-Quellcode
- Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
- Try
- If Port.IsOpen Then
- fetchedData = Port.ReadLine
- RichTextBox1.Text = RichTextBox1.Text & vbNewLine & fetchedData
- If DownOrd = 1 Then
- Gruenstate = fetchedData
- ElseIf DownOrd = 2 Then
- Gelbstate = fetchedData
- ElseIf DownOrd = 3 Then
- Rotstate = fetchedData
- DownOrd = "0"
- End If
- DownOrd += 1
- colortick()
- End If
- Catch ex As Exception
- MsgBox(ex.ToString)
- End Try
- End Sub
- Sub colortick()
- Try
- If Gruenstate = 1 Then
- OvalShape3.FillColor = Color.Green
- Else
- OvalShape3.FillColor = Color.Transparent
- End If
- If Gelbstate = 1 Then
- OvalShape2.FillColor = Color.Yellow
- Else
- OvalShape2.FillColor = Color.Transparent
- End If
- If Rotstate = 1 Then
- OvalShape1.FillColor = Color.Red
- Else
- OvalShape1.FillColor = Color.Transparent
- End If
- Catch ex As Exception
- MsgBox(ex.ToString)
- End Try
- End Sub
So und jetzt das Problemkind
Ich kann nicht mal den Button teilweise anklicken oder das Fenster verschieben, als wie wenn das Programm eingefroren wäre aber die Abfragen werden weiterhin ausgeführt.
Also fakt ist: Kann Programm nicht anklicken oder bedienen & die Nachricht wird nichtmal gesendet.
Was ist das Problem?
Gruss
Matze396