Составители:
Рубрика:
62
присваивания j=j+1, изменяющий значение переменной цикла после каждого
шага ее выполнения. Для упрощения программирования подобных ситуаций в
состав операторов языка VBA включен специальный оператор For Next,
позволяющий задать начальное значение аргументу цикла (инициализировать
цикл) в заголовке, указать условие продолжения цикла после ключевого слова
To, и автоматически модифицировать переменную цикла после завершения
выполнения операторов цикла с шагом, заданным после ключевого слова Step.
Заметим, что если шаг изменения аргумента цикла в заголовке не задан, то он
предполагается равным 1. Схема и алгоритм выполнения оператора For Next
показаны на рис. 2.10, а описание синтаксиса имеет вид:
For Счетчик=Начало To Конец [Step Шаг]
[Операторы]
[Exit For]
[Операторы]
Next [Счетчик]
For Счетчик = Начало To Конец Step Шаг Операторы1 Next Следующий оператор программы
Условие
продолжения
= True
Условие
продолжения
= False
Операторы1
Следующий
оператор
программы
Счетчик <=
Конец
Счетчик =
Счетчик + Шаг
FalseTrue
Счетчик =
Начало
Рис. 2.10. Схема и алгоритм выполнения оператора For Next
Пример 2.23. Программа с оператором For Next, реализующая задачу считывания
информации из файла.
Open " Зарплата.hhh" For Input As #1
For j = 1 To 4
If EOF(1) Then 'Проверка факта существования запиcей в файле
Exit For 'Аварийный выход в случае достижения конца файла
Else
Input #1, Ведомость(j).Фамилия_И_О
Input #1, Ведомость(j).Начислено_Ведомость
'Расчет налогов
Страницы
- « первая
- ‹ предыдущая
- …
- 60
- 61
- 62
- 63
- 64
- …
- следующая ›
- последняя »
