Choose Function

Returnerer en valgt værdi fra en liste over argumenter.

Syntaks:


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

Returværdi:

Variant. A value inferred from the Index parameter.

Parametre:

Index: Any numeric expression rounded to a whole number. Index accepts integer values starting at 1 that specify which of the possible choices to return.

Expression1, Expression2, …, Expression_n: Expressions representing each of the possible choices.

Funktionen Choose (Vælg) returnerer en værdi fra listen over udtryk, baseret på indeksværdien. Hvis Index = 1, returnerer funktionen det første udtryk på listen, hvis Index = 2, returnerer den det andet udtryk og så videre.

If the index value is less than 1 or greater than the number of expressions listed, the function returns a Null value.

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

Fejlkoder:

5 Ugyldigt Procedurekald

13 Datatypen passer ikke

Eksempel:

The following example uses the or Choose function to select a string from several strings that form a menu:


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(Index, "Hurtig format", "Gem format", "Systemformat")
End Function

Støt os venligst!