Exit While

Оценить
(0 голоса)

Осуществляет выход из цикла Do или While до его нормального завершения. Exit While

NumberVar Counter := 1;

StringVar Accum; do

( Accum := Accum +

Counter := Counter + 1;

If Length (Accum) = 100 Then Exit While) while True;

Accum

возвращает строку, содержащую 100 символов дефиса (выполнение цикла продолжается до тех пор, пока длина переменной Accum не станет равной 100 символам, и не будет выполнен оператор Exit While).

For
If Then Else
Option Loop
Do
Select Case

Добавить комментарий


Защитный код
Обновить