Funkcija Choose

Atgriež vērtību no argumentu saraksta.

Sintakse

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

Funkcijai Choose ir šādi argumenti:

Arguments	Apraksts
index	Obligāts arguments. Skaitliska izteiksme vai lauks, kurā parādās vērtība starp 1 un pieejamo izvēļu skaitu.
choice	Obligāts arguments. Varianta izteiksme, kas satur vienu no iespējamām izvēlēm.

Piezīmes

Choose Atgriež vērtību no izvēļu saraksta, pamatojoties uz vērtību index. Ja index ir 1, Choose atgriež sarakstā pirmo izvēli. Ja index ir 2, tiek atgriezta otrā izvēle utt.

Varat uzmeklēt Choose vērtību iespēju sarakstā. Piemēram, ja index novērtē ar 3 un choice-1 = "viens", choice-2 = "divi" un choice-3 = "trīs", Choose atgriež "trīs". Šī darbība ir noderīga, ja index vērtība tiek attēlota opciju grupā.

Choose Novērtē katru izvēli sarakstā, pat ja atgriež tikai vienu. Šādas uzvedības dēļ novērojiet nevēlamas blakusparādības. Piemēram, ja funkciju izmantojat MsgBox kā izteiksmes daļu visās izvēlēs, Access parāda ziņojumu lodziņu katrai izvēlei, to novērtējot, pat ja Choose tiek atgriezta tikai vienas izvēles vērtība.

Funkcija Choose atgriež Null , ja index ir mazāks par 1 vai lielāks par norādīto izvēļu skaitu.

Ja index tas nav vesels skaitlis, Access to noapaļo līdz tuvākajam veselajam skaitlim, pirms tas tiek novērtēts.

Vaicājumu piemēri

Izteiksme	Rezultāti
SELECT Choose(3,"Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec") AS Expr1 FROM ProductSales;	Atgriež trešo vērtību no vērtību saraksta. Rezultāts: "Mar".
SELECT DateofSale, Choose(Month(DateofSale),"Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec") AS MonthName FROM ProductSales;	Atgriež vērtības DateofSale kolonnā un atbilstošo mēneša nosaukumu kolonnā MonthName . Month(DateofSale) Atgriež mēneša numuru DateofSaleun Choose izmanto šo skaitli kā indeksu izvēļu sarakstam.

VBA piemērs

Šajā piemērā funkcija tiek izmantota Choose , lai parādītu nosaukumu indeksam, kuru procedūra izpilda parametrā Ind .

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