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]]) As Variant

Parámetros:

La función Switch calcula 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 calcular.

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
    sGender = GetGenderIndex( "John" )
    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!