Содержимое

# Switch Function

Вычисляет аргументы, состоящие из логических выражений, за которыми следуют значения. Возвращает значение, связанное с выражением, переданным этой функцией.

### Синтаксис:

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

### Параметры:

Функция Switch вычисляет выражения слева направо и возвращает значение, назначенное выражению функции. Если парность выражение/значение нарушена, произойдет ошибка времени выполнения.

Выражение. Выражение, которое необходимо вычислить.

Значение. Значение, возвращаемое, если результат выражения — 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 = "Маша", "жен.", sName = "Вася", "муж.")
    End Function

См. также

Choose Function

Select...Case Statement