IBM Lotus Symphony
|
Returnerer en valgt værdi fra en liste med argumenter.
Choose (Indeks, Valg1[, Valg2, ... [,Valg_n]])
Indeks: Et numerisk udtryk, der angiver den værdi, som skal returneres.
Valg1: Et udtryk, der indeholder et af de mulige valg.
Funktionen Choose returnerer en værdi fra listen med udtryk ud fra indeksværdien. Hvis Indeks = 1, returnerer funktionen første udtryk på listen. Hvis Indeks = 2, returneres det andet udtryk og så videre.
Hvis indeksværdien er mindre end 1 eller større end det angivne antal udtryk, returnerer funktionen en NULL-værdi.
I eksemplet nedenfor bruges funktionen Choose til at vælge én streng ud af flere strenge, der udgør en menu:
Sub EksempelChoose
Dim sRetur As String
sRetur = VaelgMenu(2)
Print sRetur
End Sub
Function VaelgMenu(Indeks As Integer)
VaelgMenu = Choose(Indeks, "Hurtigt format", "Gemmeformat", "Systemformat")
End Function