Función Switch

Evalúa una lista de argumentos que se compone de una expresión seguida por un valor. La función Switch devuelve un valor que está asociado con la expresión que pasa esta función.

Sintaxis:


Switch (Expresión1, Valor1[, Expresión2, Valor2[..., Expresión_n, Valor_n]])

Parámetros:

La función Switch evalúa las expresiones de izquierda a derecha y devuelve el valor que está asignado a la expresión de la función. Si expresión y valor no se dan por pares, se produce un error en tiempo de ejecución.

Expresión: La expresión que se desea evaluar.

Valor: El valor que desee devolver si la expresión es cierta (True).

En el ejemplo siguiente, la función Switch asigna el género apropiado al nombre que se pasa a la función:

Códigos de error:

5 Llamada a procedimiento no válida

Ejemplo:


Sub ExampleSwitch
Dim sGender As String
    sGenero = ObtIndGenero( "Juan" )
    MsgBox sGender
End Sub
 
Function GetGenderIndex (sName As String) As String
    ObtIndGenero = Switch(sNombre = "María", "femenino", sNombre = "Juan", "masculino")
End Function

¡Necesitamos su ayuda!