IBM Lotus Symphony
|
Devolve um valor seleccionado de uma lista de valores.
Choose (Index, Selection1[, Selection2, ... [,Selection_n]])
Index: Uma expressão numérica que especifique o valor a devolver.
Selection1: Qualquer expressão numérica que contenha uma das selecções possíveis.
A função Choose devolve um valor da lista de expressões baseado no valor do índice. Se Index = 1, a função devolve a primeira expressão da lista, se index i= 2, devolve a segunda expressão, e assim consecutivamente.
Se o valor do índice for menor do que 1 ou maior do que o número de expressões listadas, a função devolve um valor nulo.
O seguinte exemplo utiliza a função Choose para seleccionar uma cadeia das várias cadeias que formam um menu:
Sub ExampleChoose
Dim sReturn As String
sReturn = ChooseMenu(2)
Print sReturn
end sub
Function ChooseMenu(Index As Integer)
ChooseMenu = Choose(Index, "Quick Format", "Save Format", "System Format")
End Function