Оператори циклу в Visual Basic.NET.

Вкладені цикли. Оператори переривання циклів.

Перевірка домашнього завдання

• Які ви знаєте базові алгоритмічні структури?

• Які алгоритми називаються циклами?

• Типи циклічних алгоритмів.

• Загальна конструкція визначеного циклу

Цикл з параметром

ЛІЧИЛЬНИК ТІЛО ЦИКЛУ

Використовується, коли ви знаєте заздалегідь, скільки разів ви повинні виконати тіло циклу

Оператор циклу For For Next

Лічильник

=

ПочЗнач Оператори Лічильник

To

КінЗнач

[ Step

крок

]

Якщо крок не вказано, за замовчуванням крок=1.

Вкладені цикли

Вам відомо, що можна вставити один цикл For...Next в інший? Внутрішній цикл For...Next — це код, що багаторазово виконується на кожній ітерації зовнішнього циклу For…Next (кожне виконання тіла циклу зветься

його ітерацією).

Тож скільки разів виконуватиметься вну трішній код?

Додамо кнопку до форми Form1, напишемо код Dim i As Integer = 3 Dim j As Integer = 4 Dim a As Integer Dim b As Integer Dim S As Integer = 0 For a = 1 To i For b = 1 To j

S = S + 1

Next Next

MessageBox.Show("Разом: “, S)

Виконання проекту

Побудуйте проект і запустіть його. Клацніть кнопку Button1.

Буде виведено вікно повідомлення з текстом

"Разом: 12".

Це загальна кількість ітерацій внутрішнього циклу. Знову погляньте на код. Ви помітили, що 12 — це 4 х 3 (кількість ітерацій внутрішнього циклу, помножена на кількість ітерацій зовнішнього циклу)?

Зверніть увагу

В цьому прикладі ми використали дві змінних, i та j, щоб визначити кількість ітерацій зовнішнього та внутрішнього циклів. Кількість ітерацій не обов'язково має бути цілим числом. Вона може бути змінною або виразом, що

має цілочислове значення.

Зверніть увагу також на відділення внутріш нього циклу відступами.

Переривання визначеного циклу

Іноді цикл потрібно зупиняти, перш ніж лічильник циклів сягне максимального значення.

Для цього застосовують оператор Exit For. Він записується всередині оператора If...Then у тілі циклу.

Створимо нову Windows-програму, що називатиметься ExitSign (Ознака виходу). Додамо кнопку до форми Form1. Змінимо значення атрибута Text кнопки на Вийти зараз. Напишемо код.

Dim i As Integer = 0 For i = 1 To 5

MessageBox.Show("i внутрішнє = " , i)

If i = 3 Then E x i t For End If «І зовнішнє = 3» Next

MessageBox.Show("i зовнішнє = " , i)