Warum springt er nicht aus der Prozedur? Verfasst am: 20.07.2009, 08:21
Hallo,
hab da ein Problem ich möchte eine Abfrage starten sobald mein Port keine Antwort mehr bekommt. Jedoch springt das Programm nicht mehr zurück. Weiß jemand was ich falsch gemacht habe?
Code:
Sub Pause(ByRef serialPort As System.IO.Ports.SerialPort)
Dim response As String
' serialPort.Open()
1: serialPort.WriteLine("SL&F")
Try
response = serialPort.ReadLine()
Catch ex As Exception
MessageBox.Show("No response from Radio")
GoTo 1
End Try
If String.Compare(response, String.Empty) <> 0 Then
Exit Sub
End If
End Sub
Clarence Newbie
Anmeldedatum: 15.07.2009 Beiträge: 16
Verfasst am: 22.07.2009, 10:19
Ok, hab mein Problem erkannt. Habs mit einer Funktion gelöst. Falls jemand interesse an der Lösung hat kann er sich ja melden.