使用 Select Case 语句

使用 Select Case 语句作为在 If... 中使用 ElseIf 的替代方法 。然后。。。 将一个 表达式 与多个不同值进行比较时的 Else 语句。 If...Then...Else 语句可计算每个 ElseIf 语句的不同表达式， Select Case 语句则只在控制结构顶部计算一次表达式。

在以下示例中， Select Case 语句计算传递给过程的参数。 请注意，每个 Case 语句可以包含多个值、一系列值或值和比较运算符的组合。 如果 Select Case 语句与任何 Case 语句中的值均不匹配，将运行可选的 Case Else 语句。

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 

另请参阅

• Visual Basic 概念性主题

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。