Choose 函数

更新：2007 年 11 月

从参数列表中选择和返回一个值。

Public Function Choose( _
   ByVal Index As Double, _ 
   ByVal ParamArray Choice() As Object _
) As Object

参数

Index
必需。Double。数值表达式，产生一个介于 1 和在 Choice 参数中传递的元素个数之间的值。
Choice
必需。Object 参数数组。可以为以逗号分隔的 Object 变量或表达式列表或一维 Object 元素数组提供计算为 Object 数据类型的单个变量或表达式。

Choose 函数基于 Index 值返回在 Choice() 中传递的列表的一个成员。当 Index 为 1 时，选择列表的第一个成员。当 Index 为 UBound(Choice()) 时，选择列表的最后一个成员。如果 Index 在这些限制之外，则 Choose 返回 Nothing。

如果 Index 不是整数，则在计算前会先将其四舍五入为与其最接近的整数。

可以使用 Choose 在可能包含该值的列表中查找值。

说明：
参数列表中的表达式可以包括函数调用。作为为调用 Choose 准备参数列表的一部分，Visual Basic 编译器调用每个表达式中的每个函数。这意味着如果 Index 选择了不同的表达式，则不能依赖于未被调用的特定函数。

本示例使用 Choose 函数来显示一个名称，以响应用 Ind 参数传递到过程之中的索引。

Function GetChoice(ByVal Ind As Integer) As String
    GetChoice = CStr(Choose(Ind, "Speedy", "United", "Federal"))
End Function

**模块：**Interaction

**程序集：**Visual Basic 运行库（在 Microsoft.VisualBasic.dll 中）