Befehlsreferenz - Allgemein: For..Next-Anweisung

VB-Versionen:    VB4   |    VB5   |    VB6

Beschreibung:
Wiederholt einen Block von Anweisungen, bis ein Schleifenzähler einen bestimmten Wert erreicht hat.

Syntax:

For Counter = Anfang To Ende [Step Schrittweite]
  [Anweisungen]
  [Exit For]
Next

Parameter:

Counter	(Variable)
Anfang	Der Startwert von Counter
Ende	Endwert von Counter
Schrittweite	Optional. Schrittweite, um die Counter verändert wird. Voreinstellung ist 1.
Anweisungen	Der Anweisungsblock, der Ausgeführt werden soll
Exit For	Optional. Mit der Exit For Anweisung kann die Schleife frühzeitig abgebrochen werden

Der Anweisungsblock innerhalb der For..Next-Schleife wird ausgeführt wenn Counter<=Startwert oder bei negativer Schrittweite Counter>=Endwert ist.

Beim Ausführen der Next-Anweisung wird der Wert von Counter um Schrittweite geändert.

Beispiel:

Dim a As Integer, b As Integer
Dim mText As String
 
For a = 1 To 5 ' Schleife 1 beginnen.
  mText = mText & a ' aktueller Inhalt von a dem Text hinzufügen
  If a = 2 Then
    mText = mText & "-"
    For b = 9 To 1 Step -1 ' Schleife 2 beginnen.
      If b = 5 Then Exit For ' Wenn b=5 dann 2. Schleife abbrechen
      mText = mText & a
    Next
    mText = mText & "-"
  End If
Next ' Schleife 1 beenden
 
' Inhalt von mText = 12-9876-345

Siehe auch:

For Each..Next-Anweisung