Rubrique précédente: Instructions WHILE..WENDRubrique suivante: Fonctions


Instructions REPEAT..UNTIL

Une instruction REPEAT..UNTIL contient un bloc d'instructions. Une expression contrôle les exécutions répétitives d'une expression.

Le bloc d'instructions est exécuté et l'expression est évaluée. Le résultat de l'expression doit être de type Integer (entier). Le bloc d'instructions est exécuté de façon répétée jusqu'à ce que l'expression soit évaluée comme étant True (non nulle).

La syntaxe de l'instruction est la suivante :

REPEAT
bloc d'instructions
expression UNTIL

Exemple : Instructions REPEAT ... UNTIL

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 + " contient "+ str(NoOfLines) + " lignes."
end: