ВУЗ:
Составители:
Рубрика:
13
начальное и конечное значение
sum = sum + f ‘переменная счетчик увеличивается на величину шага Step 2 и
проверяется на достижение конечного значения
Next f ‘команда передает управление команде For
Range("A1").Value = sum ‘вычисленная сумма помещается в ячейку А1
активного листа
End Sub
Главной же особенностью циклов с условием является условие, которое может
быть любым выражением, принимающим значение Истина (True)
или Ложь (False). В
Visual Basic есть два основных цикла с условием – цикл Do While ... Loop и цикл Do
Until ... Loop. Оба они могут быть с предусловием или с постусловием.
Циклы Do While ... Loop и Do Until ... Loop имеют следующий синтаксис:
Цикл с предусловием:
Do While/Until Выражение
Операторы
[Exit Do]
Loop
Цикл с постусловием:
Do
Операторы
[Exit Do]
Loop While/Until Выражение
В первом случае условие задается в операторе
начала цикла, во втором – в
операторе конца цикла.
DO, LOOP – ключевые слова, обозначающие начало и окончание цикла;
WHILE и UNTIL – ключевые слова, определяющие тип цикла. Цикл DO WHILE
выполняется до тех пор, пока условие имеет значение True (т.е. пока условие
выполняется). Цикл DO UNTIL выполняется до тех пор, пока условие имеет значение
False.
EXIT DO
– принудительный выход из цикла.
Пример. Написать программу, подсчитывающую число сотрудников с высшим
образованием и суммирующую их годовой доход. Результаты поместить в отдельные
ячейки рабочего листа "Штат сотрудников" с поясняющей надписью, как показано на
рис. 4.
Рис. 4. Данные исходной таблицы с листа "Штат сотрудников" с результатами
выполнения программы в ячейках I1:J2
Для решения данной задачи определим первую пустую ячейку в столбце В
(предполагаем, что количество записей в столбце неизвестно). Введем переменную k для
счета и переменную s для суммирования доходов. Переменную смещения строк i будем
использовать для изменения адресации ячеек, увеличивая каждый раз на единицу.
