共用方式為


使用 Select Case 陳述式

使用 Select Case 語句來替代在 If... 中使用 ElseIf然後。。。將 一個 表達 式與數個不同值進行比較時,會使用 Else 語句。 While If...然後。。。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 

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應