Page 20 - 6735

Оператор вибору Select Case

Оператор вибору Select Case <змінна> дозволяє виконувати
певні команди в залежності від значення змінної <змінна>. Якщо
змінна рівна певному значенню, що перевіряється командою Case
<умови>, то виконуються команди нижче. Якщо змінна не рівна
жодному значенню, то виконуються команди після слів Case
Else. Цей оператор дозволяє уникати застосування складних
інструкцій If-ElseIf.

Dim x, y As Double

Public Sub main()
x = 2.7
Select Case x 'вибір стосується змінної 'x'
Case 1.5 'якщо x=1.5, то
y = 7.4
Case 2 To 2.7, 3, Is > 4 'якщо 2<=x<=2.7 або x=3 або x>4,
то
y = 3.2
Case Else 'у інших випдках
y = 0
End Select 'кінець вибору
Debug.Print y
End Sub

Функції вибору

Функції вибору (IIf, Choose, Switch) призначені для вибору
значення зі списку в залежності від заданих умов. У деяких
випадках вони дозволяють суттєво зменшити об’єм коду програми
шляхом уникнення застосування операторів If-Then-Else та
Select Case.

Dim x, y As Double
Dim i As Integer
20