VBA-スイッチステートメント

ユーザーが式の値に応じてステートメントのグループを実行する場合、Switch Caseが使用されます。各値はケースと呼ばれ、変数は各ケースに基づいてオンに切り替えられます。テスト式がユーザーが指定したどのケースにも一致しない場合、Case Elseステートメントが実行されます。

Case ElseはSelect Case内のオプションのステートメントですが、Case Elseステートメントを常に保持することをお勧めします。

構文

VBScriptのSwitchステートメントの構文は次のとおりです。

Select Case expression
   Case expressionlist1
      statement1
      statement2
      ....
      ....
      statement1n
   Case expressionlist2
      statement1
      statement2
      ....
      ....
   Case expressionlistn
      statement1
      statement2
      ....
      ....
   Case Else
      elsestatement1
      elsestatement2
      ....
      ....
End Select

例

デモのために、関数の助けを借りて整数のタイプを見つけましょう。

Private Sub switch_demo_Click()
   Dim MyVar As Integer
   MyVar = 1

   Select Case MyVar
      Case 1
         MsgBox "The Number is the Least Composite Number"
      Case 2
         MsgBox "The Number is the only Even Prime Number"
      Case 3
         MsgBox "The Number is the Least Odd Prime Number"
      Case Else
         MsgBox "Unknown Number"
   End Select
End Sub

上記のコードが実行されると、次の結果が生成されます。

The Number is the Least Composite Number

Vba-switch-statement

VBA-スイッチステートメント

構文

例