Selects and returns a value from a list of arguments.
Public Function Choose( _ ByVal Index As Double, _ ByVal ParamArray Choice() As Object _ ) As Object
Exception type | Error number | Condition |
---|---|---|
5 | Rank of Choice() <> 1. |
The Choose function returns a member of the list passed in Choice(), based on the value of Index. The first member of the list is selected when Index is 1. The last member of the list is selected when Index is UBound(Choice()). If Index is outside these limits, Choose returns Nothing.
If Index is not a whole number, it is rounded to the nearest whole number before being evaluated.
You can use Choose to look up a value in a list of possibilities.
Note The expressions in the argument list can include function calls. As part of preparing the argument list for the call to Choose, the Visual Basic compiler calls every function in every expression. This means that you cannot rely on a particular function not being called if a different expression is selected by Index.
This example uses the Choose function to display a name in response to an index passed into the procedure in the Ind
parameter.
Function GetChoice(Ind As Integer) As String GetChoice = CStr(Choose(
Ind,
"Speedy",
"United",
"Federal")
) End Function