Função Choose

Devolve um valor selecionado de uma lista de valores.

Sintaxe:


Choose (Índice, Seleção1[, Seleção2, ... [,Seleção_n]])

Parâmetros:

Índice: expressão numérica que especifica o valor a devolver.

Seleção1: qualquer expressão numérica que contenha uma das escolhas possíveis.

A função Choose devolve um valor da lista de expressões com base no valor do índice. Se Índice = 1, a função devolve a primeira expressão da lista, se índice 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 selecionar uma cadeia das várias cadeias que formam um menu:

Códigos de erro

5 Chamada de procedimento inválido

Exemplo:


Sub ExampleChoose
Dim sReturn As String
    sReturn = ChooseMenu(2)
    Print sReturn
End Sub
 
Function ChooseMenu(Index As Integer)
    ChooseMenu = Choose(Index, "Formato rápido", "Formato de gravação", "Formato de sistema")
End Function

Necessitamos da sua ajuda!