Книга: Windows Script Host для Windows 2000/XP
Цикл Do…Loop
Цикл Do…Loop
Этот цикл может применяться в двух видах (с предусловием, которое проверяется до начала очередной итерации, и с пост-условием, которое проверяется после окончания итерации):
Do [While | Until] условие
тело цикла
[Exit Do]
тело цикла
Loop
или
Do
тело цикла
[Exit Do]
тело цикла
Loop [While | Until] условие
Если в цикле используется ключевое слово While
, то итерации продолжаются до тех пор, покаусловие
равно true
; если же применяется Until
, то как только значением условия станет true
, произойдет выход из цикла.
Оператор Exit Do
позволяет выйти из цикла до завершения его итераций.
Пример использования цикла Do…Loop
приведен в листинге П2.4.
Листинг П2.4. Пример использования цикла Do…Loop
Dim howFar 'Верхний предел для счетчика цикла
Dim sum(10) 'Массив из 11 элементов, индексы от 0 до 10
Dim icount, theSum
howFar = 10
theSum = 0
sum(0) = 0
'Цикл выполнится 11 раз
Do
theSum = theSum+icount
sum(icount) = theSum
icount=icount+l
Loop While (icount < howFar)
- Операторы циклов
- Жизненные циклы продуктов
- 7 Система Цикл: долгосрочные цели
- 1.2.6. Циклы и ветвление
- Оператор цикла foreach
- Цикл создания программы
- Этапы аутсорсинга в цикле прицельного маркетинга
- Существуют ли интернет-версии энциклопедий?
- Лекция 3. Формы и циклы
- Утвержденное описание жизненных циклов ПО
- 5 Система Цикл: списки дел и расписания
- Совет 43. Используйте алгоритмы вместо циклов