Schleifen

Eine Schleife ist ein Anweisungsblock bzw. eine Gruppe von Anweisungen, die mit einer bestimmten Häufigkeit oder bis zur Erfüllung einer bestimmten Bedingung wiederholt wird. Welchen Schleifentyp Sie auswählen, hängt von der Programmieraufgabe und dem persönlichen Programmierstil ab. Es sind die folgende Schleifenkonstrukte implementiert:

• For-Next - Start und Endwert, automatisch inkrementierender oder dekrementierender Zähler.
• Do-Loop - Optionale Exit-Bedingung am Schleifenende.
• While-Wend - Exit-Bedingung am Schleifenanfang.

Zusätzliche Schleifenbefehle:

• exit/break - Befehl zum vorzeitigen verlassen einer Schleife.
• continue - Befehl zum Fortsetzen der Schleife mit der nächsten Iteration.

Die For-Next-Schleife ist eine Schleife mit einem Zähler, der automatisch inkrementierend oder dekrementierend ist. Die Schleife wird nur betreten, wenn der Schleifenzähler den Endwert erreichen kann und wird verlassen, wenn der Schleifenzähler den Endwert überschreitet. Die Berechnung und Prüfung des Schleifenzählers erfolgt bei der For-Next-Schleife am Schleifenanfang.

• For variable = Ausdruck to/downto [ step Ausdruck ]
  • Programmcode
• Next

Mit dem Schlüsselwort to wird der Schleifenzähler inkrementiert, mit downto wird er dekrementiert.
Das optionale Schlüsselwort step setzt die Schrittweite eines Schleifendurchgangs. Vorgabe der Schrittweite ist 1.

  dim i as integer
  For i=1 to 10
    Print "i = ";str(i)
  Next

  dim i as integer
  For i=10 downto 1
    Print "i = ";str(i)
  Next

  dim i,a,b as integer
  a=1
  b=10
  For i=a to a+b
    Print "i = ";str(i)
  Next

  dim i as double
 
  For i=0 to 1 step 0.1
    Print "i = ";str(i)
  Next

Die Do-Loop-Schleife ist eine Schleife mit optionaler Bedingung zum Verlassen. Die Schleife wird immer betreten und abhängig der optional angegebenen Bedingung am Schleifenende verlassen.

• Do
  • Programmcode
• Loop [ Until Ausdruck ]

  Do
    Print "Hallo"
  Loop

  dim a as byte
  Do
    Incr a
  Loop Until a>10  ' Verlassen der Schleife wenn a größer 10

Schleife mit Startbedingung zum Betreten und Verlassen. Die While-Wend-Schleife wird nur betreten und so lange ausgeführt wie Ausdruck wahr ist.

  dim i as integer
  i = 10
  While i>0
    i--
    Print "Hallo"
  Wend