Einfache For-Schleife mit abwärts zählender Laufvariable

Die Schleife benötigt eine Laufvariable. Im unten angegebenen Beispiel wird die Laufvariable i mit dem Wert 100 initialisiert und bei jedem Erreichen des End For um 1 erniedrigt. Ist die Abbruchbedingung 0 erreicht, wird mit dem Code nach dem End For fortgesetzt.

Die Schleife kann mit dem Befehl Exit For vorzeitig abgebrochen werden.

Die Schleife kann mit dem Befehl Continue beim nächsten Index fortgesetzt werden.

 

Dim i As Long, k As Long

 

For i := 100 DownTo 0

   k += 100

   Exit For If k >= 1000

End For