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:

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