IBM Lotus Symphony
|
Zwraca wybraną wartość z listy argumentów.
Choose (Indeks, Wybór_1[, Wybór_2, ... [,Wybór_n]])
Indeks: Wyrażenie numeryczne określające wartość do zwrócenia.
Wybór_1: Wyrażenie zawierające jedną z możliwych opcji.
Funkcja Choose zwraca wartość z listy wyrażeń na podstawie wartości indeksu. Jeśli Indeks = 1, funkcja zwraca pierwsze wyrażenie z listy, jeśli Indeks i = 2, zwraca drugie wyrażenie i tak dalej.
Jeśli wartość indeksu jest mniejsza niż 1 lub większa niż liczba wyrażeń na liście, funkcja zwraca wartość NULL.
W poniższym przykładzie funkcji Choose użyto do wybrania łańcucha z kilku łańcuchów, które tworzą menu:
Sub Przyklad_Choose
Dim sWynik As String
sWynik = ChooseMenu(2)
Print sWynik
end sub
Function ChooseMenu(Indeks As Integer)
ChooseMenu = Choose(Indeks, "Szybkie formatowanie", "Zapisywanie formatowania", "Formatowanie systemowe")
End Function