Choose Function

Liveras elektitan valoron el listo de argumentoj.

Sintakso:

Choose (Index, Selection1[, Selection2, ... [,Selection_n]])

Parametroj:

Index: Numera esprimo kiu specifas la liverotan valoron.

Selection1: Esprimo kiu enhavas iun el la eblaj elektoj.

La funkcio Choose liveras valoron el la listo de esprimoj bazita sur la indica valoro. Se Index = 1, la funkcio liveros la unuan esprimon en la listo, se index i= 2, ĝi liverosla duan esprimon, ktp.

Se la indica valoro estas malpli ol 1 aŭ pli ol la nombro da esprimoj en la listo, la funkcio liveros la valoron Null.

La jena ekzemplo uzas la funkcion Choose por elekti ĉenon el kelkaj ĉenoj kiuj formas menuon.

Ekzemplo:

Sub ExampleChoose

Dim sReturn As String

    sReturn = ChooseMenu(2)

    Print sReturn

End Sub

Function ChooseMenu(Index As Integer)

    ChooseMenu = Choose(Index, "Rapida Formato", "Konserva Formato", "Sistema Formato")

End Function