case文 Dim a As Integer a = 2 ' 2番目の条件に合致するので、処理Bが実行される Select Case a Case 1 ' 処理A Case 2 ' 処理B Case 3, 4 ' 処理C Case 5 To 10 ' 処理D Case Else ' 処理E End Select
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。