Select Case ステートメントの使用

If..で ElseIf を使用する代わりに、Select Case ステートメントを使用します。そうしたら。。。 1 つの式を複数の異なる値と比較する場合の 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 のサポートおよびフィードバックを参照してください。