Desktop Management スクリプト言語 › ステートメント › 反復文 › WHILE..WEND 文

WHILE..WEND 文

WHILE..WEND 文には、文ブロックの反復実行を制御する式が含まれます。

式の結果は Integer タイプである必要があります。 文ブロックは、式が真（ゼロ以外）と評価される間中、繰り返し実行されます。 初回に式が偽（ゼロ）と評価された場合、文ブロックは実行されません。

文の構文は以下のとおりです。

WHILE <expression>
<statement block>
WEND

EXIT WHILE により、WHILE..WEND ループは終了します。

例：

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)
WHILE NOT(Eof(hFile))
  ReadFile(hFile,TmpLine)
  NoOfLines=NoOfLines+1
WEND
CloseFile(hFile)
NoOfLines=NoOfLines-1
PRINT FileName + " Contains "+ str(NoOfLines) + " lines."
end: