Цикл For..Next

Основна форма циклів в Visual Basic - цикл For,.Next. Він використовується для виконання визначеного кількість ітерацій. Цикли For..Next зазвичай використовуються для роботи з лічильниками і в інших ситуаціях, коли кількість ітерацій відома заздалегідь. Вони мають наступний синтаксис:

For «Лічильник=ПочатковеЗначення» To «КінцевеЗначення»

Дії, що повторюються

Next Лічильник

Незважаючи на простоту цього фрагмента, зверніть увагу на деякі обставини:

Змінна Лічильник має числовий тип (Integer або Long) і вказується програмістом (наприклад, I).

Початкове Значення визначає стан змінної, з якого починається відлік.

Кінцеве Значення визначає стан змінної, в якому відлік припиняється.

Наприклад, щоб змінна x в циклі набувала значень від 1 до 5, Лічильник замінюється на x, ПочатковеЗначення - на 1, а КінцевеЗначення - на 5. У першому рядку циклу For..Next може бути присутній ключове слово Step. Воно дозволяє змінити приріст лічильника (за умовчанням воно дорівнює 1). Наприклад, якщо значення лічильника кожного разу збільшується на 3, рядок For завершуватиметься Step 3. Якщо лічильник збільшується на 2, рядок завершується Step 2. У наступному фрагменті лічильник змінюється від 10 до 100 з приростом 5:

For I = 10 To 100 Step 5

‘ Дії, що повторюються

Next

Після ключового слово Next можна не вказувати ім'я змінної-лічильника. В цьому випадку цикл For..Next просто завершується ключовим словом Next. Більше того, тести показали, що без вказівки імені змінній програма виконується швидше. Проте код має бути структурований, щоб ви могли легко знайти відповідність між різними For і Next.

Лічильник навіть може змінюватися у зворотному напрямі. Для цього слід задати початкове значення більше кінцевого і вибрати негативний приріст після ключового слова Step. Наприклад, в наступному фрагменті лічильник змінюється від 10 до 1:

For I = 10 To 1 Step - 1

Дії, що повторюються

Next

А тут лічильник змінюється від 100 до 0 із зменшенням на 10:

For I = 100 To 0 Step - 10

‘ Дії, що повторюються

Next

Щоб вийти з циклу до того, як лічильник досягне кінцевого значення, скористайтеся командою Exit For. Наприклад:

For I = 1 To 100 Step 5

X = I * 10

If X > 100 Then

Exit For

End If

Next

Цикли For..Next зустрічаються в багатьох прикладах цієї книги. Так же часто він використовуватиметься і у вашій майбутній роботі.