IBM Lotus Symphony
|
Vracia vybratú hodnotu zo zoznamu argumentov.
Choose (index, výber_1[, výber_2, ... [,výber_n]])
Index: numerický výraz špecifikujúci hodnotu, ktorá sa má vrátiť.
Výber_1: ľubovoľný výraz obsahujúci jednu z možných volieb.
Funkcia Choose vracia hodnotu zo zoznamu výrazov založeného na hodnote indexu. Ak je index = 1, funkcia vracia prvý výraz v zozname, ak je index i= 2, vracia druhý výraz, atď.
Ak je hodnota indexu menšia ako 1 alebo väčšia ako počet výrazov v zozname, funkcia vracia nulovú hodnotu.
V nasledujúcom príklade sa používa funkcia Choose na výber reťazca z viacerých reťazcov, ktoré tvoria ponuku:
Sub Príklad_Choose
Dim sReturn ako typ String
sReturn = ChooseMenu(2)
Print sReturn
end sub
Function ChooseMenu(index ako typ Integer)
ChooseMenu = Choose(index, "formát Quick", "formát Save", "formát System")
End Function