Hallo, ich möchte eine Loop Until Schleife schreiben, die beendet wird, wenn eine von zwei Bedingungen erfüllt ist. Mein bisheriger Code sieht wie folgt aus:
Code:
Do
FrageDateiLesen = ReadLine(PfadDatei, i)
If FrageDateiLesen „“ Then
ErgebnisDateiLesen = ReadLine(PfadDatei, i + 1)
Rechnen(FrageDateiLesen, ErgebnisDateiLesen, ErgebnisR, ErgebnisF)
i = i + 2
Else : MsgBox(„Sie haben " & ErgebnisR & " richtige und " & ErgebnisF & " falsche Antwort(en)“)
End If
Loop Until FrageDateiLesen = „“
End Code
Ich hoffe Ihr könnte mir sagen, was ich hinter "Loop Until FrageDateiLesen = „“ " schreiben muss um eine zweite Bedingung hinzuzufügen.
Or … habe ich bereits versucht. Es kommt jedoch die Fehlermeldung Syntaxfehler.
Wer hat eine Idee?
Vielen Dank im Vorraus Nathalie Jokisch
P.S. ich arbeite mit visualBasic 2008 Express edition