Выбор функции

Выбирает и возвращает значение из списка аргументов.

Синтаксис

Choose(index, choice-1, [ choice-2, ..., [ choice-n ]] )

Синтаксис функции Choose состоит из следующих частей:

Part Описание
индекс Обязательно. Числовое выражение или поле, возвращающее значение в диапазоне от 1 до числа доступных вариантов выбора.
choice Обязательно. Выражение варианта, содержащее один из возможных вариантов выбора.

Замечания

Функция Choose возвращает значение из списка вариантов на основе значения аргумента index. Если index имеет значение 1, функция Choose возвращает первый вариант; для index равного 2 возвращается второй вариант выбора и т. д.

Используйте команду Выбрать , чтобы найти значение в списке возможностей. Например, если аргумент index получает значение 3, и choice-1 = "один", choice-2 = "два", а choice-3 = "три", функция Choose возвращает значение "три". Эта возможность часто используется в тех случаях, когда аргумент index представляет значение в группе вариантов.

Функция Choose возвращает один вариант выбора из списка, однако оценивает все имеющиеся. В связи с этим необходимо учитывать нежелательные побочные эффекты ее применения. Например, если во всех вариантах функция MsgBox входит в состав выражения, для каждого оцениваемого варианта будет отображаться окно сообщения, хотя при этом функция Choose возвращает значение только одного из них.

Функция Choose возвращает значение Null, если аргумент index имеет значение меньше 1 или больше числа доступных вариантов в списке.

Если аргумент index имеет не целое значение, перед вычислением оно округляется до ближайшего целого.

Пример

В этом примере функция Выбор используется для отображения имени в ответ на индекс, переданный в процедуру в параметре Ind .

Function GetChoice(Ind As Integer)
    GetChoice = Choose(Ind, "Speedy", "United", "Federal")
End Function

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.