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

End Select

Case Else

Case 1 To 10

Case 0

Select Case Y

Dim Y as Integer

End Select

Наприклад:

Private Sub Command_Click()

Print "Y=0"

x=a+b

Print “Y між 1 і 10”

x=a-b

Case –1, -5

Print “Y дорівнює –1 або -5”

x=a*b

Case –2 To –4

Print “Y між –2 і -4”

x=a\b

Case Is <= -6

Print “Y дорівнює –6 або менше”

Print “Y більше 10”

Даний приклад ілюструє, що як значення для блоку Case можна указувати не тільки одне значення перевірочного вираження(0), але і декілька, розділених комою (-1, -5). Можна визначати також сфери порівняння(1 То 10, –2 To –4) абоскористатися відносним порівнянням (Is <= -6). Замість безпосереднього значення перевірочного вираження можна використовувати ключове слово Is.

Блок Case Else виконується, якщо жодна з попередніх умов не є істинною.

Якщо умові Select Case відповідає декілька блоків Case, то виконується перший з них.

Оператор циклу є вказівкою, з якої ясно, який блок операцій (цей блок операцій називається тілом циклу) потрібно виконувати багато разів і яке правило закінчення виконання циклу.

Для багаторазового виконання одного або декількох операторів Visual Basic пропонує дві конструкції: параметричний цикл For... Next дає можливість встановлювати кількість проходів циклу, а цикл Do... Loop завершується при виконанні заданої умови.

Параметричний оператор циклу For...Next.

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

Синтаксис циклу For...Next:

For Лічильник =Начальное_значение То Конечноє_значеніє [Step Крок ]

Блок операцій (тіло циклу)

Next [ Лічильник ]

Слова For (для), To (до), Step (крок), Next (потім) є зарезервованими.

Застосовані позначення:

Лічильник – ім'я параметра циклу (змінна будь-якого числового типу);

Початкове значення – початкове значення параметра циклу (вираження будь-якого числового типу), яке параметр циклу матиме при першому виконанні тіла циклу;

Кінцеве значення – кінцеве значення параметра циклу (вираження будь-якого числового типу);

Крок – крок зміни параметра циклу (вираження будь-якого числового типу) – необов'язкова частина оператора циклу.

Числові значення Початкове значення і Кінцеве значення задають інтервал, в якому змінюватиметься параметр циклу. Необов'язковий параметр Крок задає крок зміни параметра циклу на кожному проході. За замовчуванням, якщо він відсутній, то приймається рівним 1. Нарешті, після операцій, що складають тіло циклу, слідує команда Next, що позначає межу дії циклу. У разі вкладених циклів (в тіло циклу входить оператор циклу) можна вказувати, до якого з них належить команда Next. Це досягається додаванням після слова Next імені параметра циклу.

Процес виконання оператора For... Next для позитивного кроку ілюструє рисунок 4.4.

На початку виконання циклу значення параметра циклу Лічильник встановлюється в Початкове значення. При кожному проході параметр циклу Лічильник збільшується на 1 або на величину Крок. Якщо значення параметра циклу досягає або стає більше (менше при негативному кроці) Кінцеве значення, то цикл завершується і виконуються наступні оператори. Різниця по модулю між початковим і кінцевим значенням, збільшена на величину кроку і потім поділена на величину кроку, і становить число проходів циклу.

Розглянемо приклади.

Приклад 1:

For I =1 То 10

Print I*100 Next

Рисунок 4.4 - Базова структура параметричного оператору циклу
For … Next (для позитивного кроку)

В прикладі 1 проходів циклу 10, на кожному на екран виводиться результат добутку параметра циклу змінної I на 100.

Приклад 2. Ілюструє явно заданий крок циклу і відлік у зворотному напрямі.

For L =10 To 5 Step -0.5

X = Y *L

Print Х

Дата добавления: 2015-05-24