使用 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 支援與意見反應。