Конструкция Do Until используется, когда цикл должен продолжаться до тех пор, пока определенное условие не станет истинным.
Сегодня в уроке рассмотрим примеры кода, чтобы понять, как работает цикл Do Until.
⏩ Синтаксис
Цикл начинается с ключевого слова Do Until, за которым следует условие, которое нужно проверять перед каждым выполнением тела цикла.
Если условие истинно (возвращается True), то выполнение цикла прекращается, и управление передается на строку кода, следующую за блоком Loop.
⏩ Примеры
- Вывод переменной на консоль
В этом примере объявляем переменную i, присваиваем ей начальное значение 1 и входим в цикл Do Until. В условии цикла сразу проверяем, что значение i не больше 5, и выполняем тело цикла до тех пор, пока это условие истинно. Внутри цикла выводим значение i на консоль и увеличиваем его на 1.
Когда значение i станет равным 6, условие цикла станет ложным, и выполнение цикла прекратится.
- Проверка пользовательского ввода
Цикл Do Until может быть полезным для проверки пользовательского ввода.
Например, можно использовать цикл Do Until для того, чтобы принимать ввод от пользователя до тех пор, пока он не введет число в диапазоне от 1 до 10:
В этом примере использован цикл Do Until, чтобы продолжать запрашивать пользовательский ввод, пока он не введет число от 1 до 10.
Код userInput = InputBox("Введите число от 1 до 10") открывает диалоговое окно, в котором пользователь может ввести число:
Если введенное число не находится в диапазоне от 1 до 10, цикл продолжит выполняться, и пользователь будет заново запрашиваться ввод.
Как только пользователь введет число в допустимом диапазоне, цикл Do Until завершится, и программа продолжит выполнение кода (выведет сообщение с введенным пользователем числом):
- Поиск определенного значения в диапазоне
Цикл Do Until может быть использован для поиска определенного значения в диапазоне ячеек.
Например, можно использовать цикл Do Until для поиска первой ячейки в столбце, которая содержит определенное значение:
Переменная currentRow устанавливается на 1, так как поиск начинается с первой строки. Затем цикл Do Until проверяет каждое значение в столбце A, начиная с первой строки.
- если значение равно "Товар 1", то выдается сообщение об успешном поиске и процедура завершается с помощью оператора Exit Sub.
- если значение не найдено в первых 100 строках, выдается сообщение об ошибке.
Код можно использовать для быстрого поиска определенного значения в большом диапазоне ячеек, что может сэкономить время при обработке больших объемов данных.