Switch 函数

对自变量列表进行求值。自变量列表由表达式和表达式后面的值组成。Switch 函数返回一个与该函数传送的表达式相关的值。

语法：

Switch (Expression1, Value1[, Expression2, Value2[..., Expression_n, Value_n]])

参数：

Switch 函数从左向右对表达式进行求值，然后返回指定到函数表达式的值。如果表达式和值不是成对给出，将发生运行时错误。

Expression：要求值的表达式。

Value：当表达式为 True 时返回的值。

在下面的示例中，Switch 函数将为传送到该函数的姓名指定适当的性别：

错误代码：

5 无效的过程调用

示例：

Sub ExampleSwitch

Dim sGender As String

    sGender = GetGenderIndex( "John" )

    MsgBox sGender

End Sub

 

Function GetGenderIndex (sName As String) As String

    GetGenderIndex = Switch(sName = "Jane", "female", sName = "John", "male")

End Function