Choose Function

傳回從引數清單中選取的值。

語法：


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

參數：

Index：用於指定傳回值的數值型表示式。

Selection1：包含一個可能選項的任意表示式。

Choose 函式將依 Index 值從表示式清單中傳回一個值。如果 Index = 1，則函式將傳回清單中的第一個表示式；如果 Index i= 2，則傳回第二個表示式，以此類推。

如果 Index 值小於 1 或者大於列出的表示式數，則函式傳回空值。

下面示例中的 Choose 函式將從構成功能表的數個字串中選取一個字串：

錯誤代碼：

5 無效的程序呼叫

示例：


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