Funkce Choose

Vrátí hodnotu ze seznamu argumentů.

Syntaxe

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

Funkce Choose má tyto argumenty:

Argument	Popis
index	Povinný argument. Číselný výraz nebo pole, jehož výsledkem je hodnota mezi 1 a počtem dostupných voleb.
choice	Povinný argument. Výraz typu varianta, který obsahuje jednu z možných voleb.

Poznámky

Choose Vrátí hodnotu ze seznamu voleb založenou na hodnotě index. Pokud index je roven 1, Choose vrátí první volbu v seznamu. Pokud index je roven hodnotě 2, vrátí druhou volbu a tak dále.

Můžete ji použít Choose k vyhledání hodnoty v seznamu možností. Například pokud index je výsledek vyhodnocen jako 3 a choice-1 = "jedna", choice-2 = "dvě" a choice-3 = "tři", Choose vrátí "tři". Toto chování je užitečné, pokud index představuje hodnotu ve skupině voleb.

Choose Vyhodnotí všechny volby v seznamu, přestože vrátí jenom jednu volbu. Kvůli tomuto chování si všímejte nežádoucích vedlejších účinků. Pokud například použijete MsgBox funkci jako část výrazu ve všech volbách, Access při vyhodnocování každé volby zobrazí okno se zprávou, i když Choose vrátí hodnotu pouze jedné volby.

Funkce Choose vrátí Null hodnotu KDYŽ index je menší než 1 nebo větší než počet uvedených voleb.

Pokud index se nejedná o celé číslo, Access ho před vyhodnocením zaokrouhlí na nejbližší celé číslo.

Příklady dotazů

Výraz	Výsledky:
SELECT Choose(3,"Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec") AS Expr1 FROM ProductSales;	Vrátí třetí hodnotu ze seznamu hodnot. Výsledek: "Mar".
SELECT DateofSale, Choose(Month(DateofSale),"Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec") AS MonthName FROM ProductSales;	Vrátí hodnoty ve DateofSale sloupci a odpovídající název MonthName měsíce. Month(DateofSale)Vrátí číslo měsíce pro DateofSaleChoose a použije toto číslo jako index pro seznam voleb.

Příklad jazyka VBA

Tento příklad používá Choose funkci k zobrazení názvu indexu, který procedura předá v parametru Ind .

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