Реферат: Основы Visual Basic 50

Пример 2.

If optColor1.Value Then

Color$ = “Красный”

Else If optColor2.Value Then

Color$ = “Зеленый”

Else If optColor3.Value Then

Color$ = “Синий”

Else

Color$ = “Белый”

End If

Пример:

Select Case Den

Case 1

Print “Пн”

Case 2

Print “Вт”

.

.

.

Case 7

Print “Вс”

End Select

В фразе Case можно задавать значения переменной в виде диапазона

Select Case Den

Case 1 to 5

Print “Рабочий день”

Case Else

Print “Выходной”

End Select