使用 Select Case 语句作为在 If... 中 使用 ElseIf 的 替代方法。然后...将 一个表达式与几个 不同的值 进行比较时,Else 语句。 If...Then...Else 语句可计算每个 ElseIf 语句的不同表达式, Select
Case 语句则只在控制结构顶部计算一次表达式。
在以下示例中, Select Case 语句计算传递给过程的参数。 请注意,每个 Case 语句可以包含多个值、一系列值或值和 比较运算符的组合。 如果 Select
Case 语句与任何 Case 语句中的值均不匹配,将运行可选的 Case Else 语句。
VB复制
Function
Bonus(performance, salary)
Select Case
performance
Case 1
Bonus = salary * 0.1
Case 2, 3
Bonus = salary * 0.09
Case 4 To 6
Bonus = salary * 0.07
Case Is > 8
Bonus = 100
Case Else
Bonus = 0
End Select
End Function