Führt eine Reihe von Anweisungen aus, wenn eine bestimmte Bedingung "True" ist.
Syntax
While condition [statements] Wend
Argumente:
Condition: Numerischer oder Zeichenfolgenausdruck, der als "True" oder "False" ausgewertet wird. Wenn "condition" Null ist, wird die Bedingung als "False" behandelt.
Statements: Anweisungen, die ausgeführt werden, während die Bedingung "True" ist.
Anmerkungen
Wenn die Bedingung "True" ist, werden alle Anweisungen in "statements" ausgeführt, bis die Wend-Anweisung vorgefunden wird. Die Kontrolle wird dann wieder an die While-Anweisung zurückgegeben, und die Bedingung wird erneut geprüft. Wenn die Bedingung immer noch "True" ist, wird der Prozess wiederholt. Wenn sie nicht "True" ist, wird die Ausführung mit der Anweisung nach der Wend-Anweisung fortgesetzt.
"While...Wend"-Schleifen können bis zu jeder beliebigen Ebene verschachtelt werden. Jede Wend-Anweisung entspricht der letzten While-Anweisung.
Note:
Die "Do...Loop"-Anweisung bietet eine strukturiertere und flexiblere Möglichkeit, Schleifen auszuführen.
Das folgende Beispiel veranschaulicht die Verwendung der "While...Wend"-Anweisung:
Beispiel 1:
Dim Counter Counter = 0 ' Initialize variable. While Counter < 20 ' Test value of Counter. Counter = Counter + 1 ' Increment Counter. Wend ' End While loop when Counter > 19.