END SELECT

В качестве тест-выражения может выступать любое числовое или даже строковое выражение. А выбор блока операторов осуществляется последовательным сравнением значения тест-выражения со списками выражений, которые могут содержать один или более разделённых запятыми элементов, каждый из которых относится к одному из трёх видов: выражение, определяющее единственное значение; пара выражений, разделённых ключевым словом TО и определяющая ограниченный значениями этой пары диапазон; выражение, начинающееся с ключевого слова IS и следующего за ним знака операции отношения (сравнения), также определяющее соответствующий диапазон.

Работу оператора SELECT CASE … END SELECT можно проиллюстрировать на примере следующего фрагмента программы, запускаемой щелчком по кнопке и выполняющей пересчёт рейтинговой оценки из стобалльной шкалы в четырёхбалльную:

Select Case Rating' тест-выражение

Case Is< 0, Is > 100 ' выбор по списку_выражений

txtОценка.Value = "Вне диапазона"

Case Is >= 85 ' "Отлично", если Rating>= 85

txtОценка.Value = "Отлично"

Case70 To 85 ' "Хорошо", если Ratingв диапазоне 70 – 85

txtОценка.Value = "Хорошо"

Case Is >= 55 ' не хорошо, но вполне удовлетворительно

txtОценка.Value = "Удовлетворительно"

Case Else ' иначе – всё, что осталось…

txtОценка.Value = "Неудовлетворительно"