VBScriptエラーのエラーである"'Case' がありません。"の原因と対処に関して説明します。
エラーメッセージ：
'Case' がありません。
エラーメッセージ(英語)：
Expected 'Case'
スポンサード リンク
エラーコード：
1021
エラー原因：
select の後に case がありません。
【誤】
x=2
Select x
Case 1
MsgBox "値は1"
Case 2
MsgBox "値は2"
Case 3
MsgBox "値は3"
Case Else
MsgBox "値は1,2,3以外"
End Select
【正】
x=2
Select case x
Case 1
MsgBox "値は1"
Case 2
MsgBox "値は2"
Case 3
MsgBox "値は3"
Case Else
MsgBox "値は1,2,3以外"
End Select
スポンサード リンク
対処：
select の後にcase を指定します。
スポンサード リンク