Choose funktsioon

Tagastab valitud väärtuse argumentide loendist.

Süntaks:


Choose (Index, Selection1[, Selection2, ... [,Selection_n]])

Parameetrid:

Index: arvavaldis, mis määrab tagastatava väärtuse.

Selection1: suvaline avaldis, mis sisaldab ühte võimalikest valikutest.

Funktsioon Choose tagastab väärtuse avaldiste loendist indeksi väärtuse põhjal. Kui indeks =1, siis tagastab funktsioon loendi esimese väärtuse, kui indeks =2, siis teise väärtuse jne.

Kui indeksi väärtus on väiksem kui 1 või suurem kui loendis olevate avaldiste arv, siis tagastab funktsioon tühiväärtuse.

Järgmises näites kasutatakse funktsiooni Choose stringi valmiseks menüü moodustavate erinevate stringide hulgast:

Veakoodid:

5 Vigane protseduuri väljakutse

Näide:


Sub ExampleChoose
Dim sReturn As String
    sReturn = ChooseMenu(2)
    Print sReturn
End Sub
 
Function ChooseMenu(Index As Integer)
    ChooseMenu = Choose(Index, "Kiire vorming", "Salvesta vorming", "Süsteemi vorming")
End Function