Choose
按基于1的索引从参数列表中选择并返回一个值。
语法：Choose( index , choice-1 [ , choice-2 , ... [ , choice-n ] ] )
- index
- 必需 数值表达式，求值为1到可用选项数之间的值。
- choice
- 必需 Variant表达式，包含一个可能的选项。
如果index为1，Choose返回choice-1；如果index为2，返回choice-2；以此类推。如果index小于1或大于列出的选项数，Choose返回Null。index的非整数值在求值前四舍五入到最接近的整数。
INFO
Choose会评估列表中的每个选项，而不仅仅是它返回的那个。注意副作用：任何选项中的MsgBox调用会对每个选项调用一次，而不仅仅是选中的那个。要避免这种情况——例如当某个分支会出错时——请改用短路If函数。
示例
本示例使用Choose将基于1的选项索引映射到名称。
vb
Function GetChoice(Ind As Integer) As String
GetChoice = Choose(Ind, "Speedy", "United", "Federal")
End Function