Теоретичний матеріал. Оператор Select Case

Ще одним оператором розгалуження Visual Basic є Select Case, що дозволяє виконати одну з декількох груп операторів у залежності від значення умови. Інструкція Select Case має наступний синтаксис:

Select Case Перевірочний вираз

Case Значення 1

Оператори 1

Case Значення 2

Оператори 2

Case Else

Оператори З

End Select

Для блоку Case можна вказувати не тільки одне значення (1), але і декілька, розділених комами (2, 3). Можна визначити також області порівняння (4 То 6) або скористатися відносним порівнянням (Is >= 9). Замість безпосереднього перевірочного виразу можна використовувати ключове слово (Is=”3”). Блок Case Else виконується, якщо жодна з попередніх умов не є істинною.

Приклад

Private Sub Command1_Click()

n = Int(Rnd * 10) + 1 {генератор випадкових чисел}

Select Case n

Case 1

Print " internet"

Case 2

Print "Україна"

Case 3

Print "basic"

Case Else

Print "Ivanenko"

End Select

End Sub

Контрольні запитання.

1. Який синтаксис оператора Select Case?

2. Чим відрізняється оператор Select Case від умовного оператора?

Завдання для самостійного розв’язку.

1.Ввести номер студента зі списку, вивести його прізвище.

2.Ввести першу букву назви країни. Вивести назву континенту.

3.Вести номер місяця, вивести номер кварталу.

4.Ввести телефонний код міста, вивести назву міста.

5.Ввести номер автобуса, вивести кінцеву зупинку.

6.Ввести першу букву назви річки, вивести її довжину.