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:
|
Copyright © 2013 CA.
Alle Rechte vorbehalten.
|
|