Funkcia Choose

Vráti hodnotu zo zoznamu argumentov.

Syntax

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

Funkcia Choose má tieto argumenty:

Argument	Popis
index	Povinný argument. Numerický výraz alebo pole, ktoré vracia hodnotu medzi 1 a počtom dostupných možností.
choice	Povinný argument. Výraz typu Variant, ktorý obsahuje jednu z možných možností.

Poznámky:

Choose Vráti hodnotu zo zoznamu možností na základe hodnoty index. Ak index je argument 1, Choose vráti prvú možnosť v zozname. Ak index je hodnota 2, vráti sa druhá možnosť atď.

Môžete ju použiť Choose na vyhľadanie hodnoty v zozname možností. Ak sa napríklad index vyhodnotí ako 3 a choice-1 = "jeden", choice-2 = "dva", a choice-3 = "tri", Choose vráti sa "tri". Toto správanie je užitočné, keď index predstavuje hodnotu v skupine možností.

Choose Vyhodnotí všetky možnosti v zozname, hoci vráti iba jednu. V dôsledku tohto správania sledujte nežiaduce vedľajšie efekty. Ak napríklad použijete funkciu MsgBox ako súčasť výrazu vo všetkých voľbách, Access zobrazí okno s hlásením pre každú možnosť počas jej vyhodnocovania, hoci Choose vráti hodnotu iba jednej voľby.

Funkcia Choose vráti Null , ak index je menšia ako 1 alebo väčšia ako počet uvedených možností.

Ak index nie je celé číslo, Access ho pred vyhodnotením zaokrúhli na najbližšie celé číslo.

Príklady dotazov

Výraz	Výsledky
SELECT Choose(3,"Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec") AS Expr1 FROM ProductSales;	Vráti tretiu hodnotu zo zoznamu hodnôt. Výsledok: "Mar".
SELECT DateofSale, Choose(Month(DateofSale),"Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec") AS MonthName FROM ProductSales;	Vráti hodnoty a DateofSale zodpovedajúci názov mesiaca v stĺpci MonthName . Month(DateofSale) Vráti číslo mesiaca pre DateofSalevýraz , ktoré Choose použije ako index pre zoznam možností.

Príklad VBA

V tomto príklade je funkcia Choose použitá na zobrazenie názvu indexu, ktorý procedúra odovzdáva v parametri Ind .

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