Vorheriges Thema: WHILE..WEND-AnweisungenNächstes Thema: Funktionen


REPEAT..UNTIL-Anweisungen

Eine REPEAT..UNTIL-Anweisung enthält einen Anweisungsblock. Ein Ausdruck steuert wiederholte Ausführungen durch einen Ausdruck.

Der Anweisungsblock wird ausgeführt und die Anweisung bewertet. Das Ergebnis des Ausdrucks muss eine ganze Zahl sein. Der Anweisungsblock wird wiederholt separat ausgeführt, bis die Auswertung des Ausdrucks einen wahren Wert (ungleich null) ergibt.

Die Syntax für diese Anweisung lautet:

REPEAT
Anweisungsblock
UNTIL Ausdruck

Beispiel: REPEAT … UNTIL-Anweisungen

DIM FileName as String
DIM NoOfLines as Integer
DIM TmpLine as string
DIM hFile as Integer
FileName="C:\AUTOEXEC.BAT"
NoOfLines=0
hFile=OpenFile(FileName,0,0)
REPEAT
 ReadFile(hFile,TmpLine)
 NoOfLines=NoOfLines+1
UNTIL Eof(hFile)
CloseFile(hFile)
NoOfLines=NoOfLines-1
PRINT FileName + " enthält "+ str(NoOfLines) + " Zeilen."
end: