Funkcija Choose

Vrne izbrano vrednost iz seznama argumentov.

Skladnja:


  Choose (Index As Integer, Expression1[, Expression2, ... [, Expression_n]]) As Variant

Vrnjena vrednost:

Variant. A value inferred from the Index parameter.

Parametri:

Indeks: celoštevilska vrednost (od 1 naprej), ki določa možne vrnjene vrednosti.

Izbira1: poljuben izraz, ki vsebuje eno od možnih izbir.

Funkcija Choose vrne vrednost iz seznama izrazov, uporabljajoč pri tem vrednost indeksa. Če je Indeks = 1, vrne funkcija prvi izraz v seznamu, če je Indeks = 2, vrne drugi izraz, in tako dalje.

Če je vrednost indeksa pod 1 ali večja kot je dolžina seznama, vrne funkcija vrednost Null.

Error #5 occurs when parameters are omitted. Error #13 occurs if Index equals Null.

Kode napak:

5 Neveljaven klic procedure

13 Vrsta spremenljivk se ne ujema

Primer:

Naslednji primer uporablja funkcijo Choose, da iz menija, ki ga sestavlja več nizov, izbere želeni niz:


Sub ExampleChoose
    Print ChooseMenu(2) ' "Save Format"
    MsgBox Choose(index :=  -5, 9, "Basic", PI) ' Null
    MsgBox Choose(index := 3.14, 9, "Basic", PI) ' PI
End Sub
 
Function ChooseMenu(Index As Integer)
    ChooseMenu = Choose(Indeks, "Nov", "Odpri", "Nedavni dokumenti")
End Function

D'oh! You found a bug (text/sbasic/shared/03090102.xhp#Select_h1 not found).

D'oh! You found a bug (text/sbasic/shared/03090410.xhp#Switch_h1 not found).