Export (0) Print
Expand All

Switch Function 

Evaluates a list of expressions and returns an Object value corresponding to the first expression in the list that is True.


Public Function Switch( _
    ByVal ParamArray VarExpr() As Object _
) As Object

Parameters

VarExpr

Required. Object parameter array. Must have an even number of elements. You can supply a list of Object variables or expressions separated by commas, or a single-dimensional array of Object elements.

Exception type Error number Condition

ArgumentException

5

Number of arguments is odd.

See the "Error number" column if you are upgrading Visual Basic 6.0 applications that use unstructured error handling. (You can compare the error number against the Number Property (Err Object).) However, when possible, you should consider replacing such error control with Structured Exception Handling Overview for Visual Basic.

The argument supplied to VarExpr consists of paired expressions and values. The Switch function evaluates the odd-numbered expressions from lowest to highest index in VarExpr, and returns the even-numbered value associated with the first expression that evaluates to True. For example, if VarExpr(0) is True, Switch returns VarExpr(1), and if VarExpr(0) is False but VarExpr(2) is True, Switch returns VarExpr(3), and so on.

If you do not supply the VarExpr argument, Switch returns Nothing.

NoteNote

The expressions in the argument list can include function calls. As part of preparing the argument list for the call to Switch, the Visual Basic compiler calls every function in every expression. This means that you cannot rely on a particular function not being called if an expression earlier in the argument list is True.

The following example uses the Switch function to return the name of a language that matches the name of a city. It requires that Option Strict be Off.

Function matchLanguage(ByVal cityName As String) As String
    Return CStr(Microsoft.VisualBasic.Switch( _
        cityName = "London", "English", _
        cityName = "Rome", "Italian", _
        cityName = "Paris", "French"))
End Function

Because the System.Diagnostics namespace also contains a class called Switch, a call to the Switch function must be qualified with the Microsoft.VisualBasic namespace.

Namespace: Microsoft.VisualBasic

Module: Interaction

Assembly: Visual Basic Runtime Library (in Microsoft.VisualBasic.dll)

Community Additions

ADD
Show:
© 2014 Microsoft