Hallo,
in dem folgenden Code, läuft eine For -Schleife 3 Mal durch.
Aber es soll sobald Exit For getriggert wird, die Schleife verlassen.
In diesem Fall passiert es nicht.
Warum?
Alles anzeigen
Die Orange LED leuchtet immer auf.
Obwohl es in der Case 1 bereits auf Check_sucessfull = 1 setzen und dann die Schleife verlassen sollte.
Was ist falsch nach eurer Meinung nach.
in dem folgenden Code, läuft eine For -Schleife 3 Mal durch.
Aber es soll sobald Exit For getriggert wird, die Schleife verlassen.
In diesem Fall passiert es nicht.
Warum?
BASCOM-Quellcode
- Check_user:
- Dim I As Byte
- For I = 1 To 3
- Select Case I
- Case "1"
- Varname = Larname_1
- If Varname = Com_array(2) Then
- Check_sucessfull = 1
- Exit For
- End If
- Case "2"
- Varname = Larname_2
- If Varname = Com_array(2) Then
- Check_sucessfull = 1
- Exit For
- End If
- Case "3"
- Varname = Larname_3
- If Varname = Com_array(2) Then
- Check_sucessfull = 1
- Exit For
- End If
- End Select
- Next
- If Check_sucessfull = 1 Then
- Orang_LED = 0
- Elseif Check_sucessfull = 0 Then
- Orang_LED = 1
- End If
- Return
Obwohl es in der Case 1 bereits auf Check_sucessfull = 1 setzen und dann die Schleife verlassen sollte.
Was ist falsch nach eurer Meinung nach.