Vba-switch-statement
提供:Dev Guides
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