Pateikia reikšmę iš argumentų sąrašo.
Sintaksė
Choose(index, choice-1 [, choice-2] ... [, choice-n])
Funkcija Choose turi tokius argumentus:
| Argumentas | Aprašymas |
|---|---|
index |
Būtinas. Skaitinis reiškinys arba laukas, kurio rezultatas yra reikšmė nuo 1 iki galimų pasirinkimų skaičiaus. |
choice |
Būtinas. Varianto išraiška, kurioje yra vienas iš galimų pasirinkimų. |
Pastabos
Choose Grąžina reikšmę iš pasirinkimų sąrašo pagal reikšmę index. Jei index yra 1, Choose grąžina pirmą pasirinkimą sąraše. Jei index yra 2, grąžinamas antrasis pasirinkimas ir t. t.
Galite ieškoti Choose reikšmės galimybių sąraše. Pavyzdžiui, jei index įvertina 3 ir choice-1 = "vienas", choice-2 = "du" ir choice-3 = "trys", Choose grąžina "trys". Šis veikimas naudingas, kai index pateikiama reikšmė parinkčių grupėje.
Choose Įvertina visus sąrašo pasirinkimus, net jei pateikia tik vieną. Dėl tokio elgesio stebėkite, ar nėra nepageidaujamo šalutinio poveikio. Pavyzdžiui, jei funkciją naudojate MsgBox kaip reiškinio dalį visuose pasirinkimuose, "Access" rodo kiekvieno pasirinkimo pranešimo lauką, kai jį vertina, net jei Choose grąžina tik vieno pasirinkimo reikšmę.
Funkcija Choose pateikia Null , jei index yra mažiau nei 1 arba daugiau nei pateiktų pasirinkimų skaičius.
Jei index tai nėra sveikasis skaičius, prieš įvertindama programa Access suapvalina jį iki artimiausio sveikojo skaičiaus.
Užklausų pavyzdžiai
| Išraiška | Rezultatai |
|---|---|
SELECT Choose(3,"Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec") AS Expr1 FROM ProductSales; |
Grąžina trečią reikšmę iš reikšmių sąrašo. Rezultatas: "kov". |
SELECT DateofSale, Choose(Month(DateofSale),"Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec") AS MonthName FROM ProductSales; |
Pateikia reikšmes DateofSale ir atitinkamą mėnesio pavadinimą stulpelyje MonthName .
Month(DateofSale)Grąžina mėnesio numerį ir DateofSaleChoose naudoja šį skaičių kaip pasirinkimų sąrašo indeksą. |
VBA pavyzdys
Pastaba
Toliau pateikti pavyzdžiai, kaip naudoti šią funkciją "Visual Basic for Applications" (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos), tada ieškos lauke įveskite vieną ar daugiau sąlygų.
Šiame pavyzdyje naudojama funkcija, Choose rodanti indekso, kurį procedūra perduoda parametre Ind , pavadinimą.
Function GetChoice(Ind As Integer)
GetChoice = Choose(Ind, "Speedy", "United", "Federal")
End Function