Функция Choose

Важно : Тази статия е преведена машинно – вижте отказа от отговорност. Английската версия на тази статия за справка можете да намерите тук .

Избира и връща стойност от списък от аргументи.

Синтаксис

Избор ( индекс , избор-1 [, избор 2]... [, избор-n] )

Синтаксисът на функцията Choose има следните аргументи:

Аргумент

Описание

индекс

Изисква се. Числов израз или поле, което води до стойност между 1 и броя на наличните опции.

избор

Изисква се. Вариантен израз, съдържащи един от възможни решения.


Забележки

Choose връща стойност от списък с възможности, въз основа на стойността на индекса. Ако индекс е 1, Choose връща първият избор в списъка; Ако индексът е 2, тя връща втори избор и т.н.

Можете да използвате избор за търсене на стойност в списък от възможности. Например ако индекс се оценява на 3 и избор-1 = "един", избор-2 = "две" и избор 3 = "три", Choose връща "три". Тази възможност е особено полезно, ако индекс представя стойността в група от опции.

Изберете оценява всеки избор в списъка, въпреки че я връща само една. Поради тази причина трябва да гледате за нежелани странични ефекти. Например ако използвате функцията MsgBox като част от израз във всички възможности, поле за съобщения ще бъдат показани за всеки избор, то се оценява, въпреки че Choose връща стойността на само един от тях.

Функцията Choose връща Null, ако индекс е по-малко от 1 или по-голямо от броя на възможностите за избор в списъка.

Ако индексът не е цяло число, то се закръглява до най-близкото цяло число преди се изчислява.

Пример

Забележка : Примерите по-долу илюстрират използването на тази функция във Visual Basic for Applications (VBA). За повече информация относно работата с VBA изберете Справочни материали за разработчици в падащия списък до Търсене и въведете един или няколко термина в полето за търсене.

Този пример използва функцията Choose , за да покажете име в отговор на индекс вкарани в процедурата в Ind параметъра.

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

Забележка : Отказ от отговорност за машинен превод: Тази статия е преведена от компютърна система без човешка намеса. Microsoft предлага тези машинни преводи, за да помогне на потребителите, които не говорят английски, да се възползват от съдържанието за продукти, услуги и технологии на Microsoft. Тъй като статията е преведена машинно, е възможно да съдържа грешки в речника, синтаксиса и граматиката.

Разширете уменията си
Преглед на обучението
Получавайте първи новите функции
Присъединете се към участниците в Office Insider

Беше ли полезна тази информация?

Благодарим ви за обратната връзка!

Благодарим ви за вашата обратна връзка. Изглежда, че ще бъде полезно да ви свържем с един от нашите агенти по поддръжката на Office.

×