条件式で悩んでいます（VB.NET)

質問

10～15までの数字と、それ以外の数（A）があります。
10、12、15と、Aが出た時、○を表示させ、
11、13、14には処理をさせたくありません。

上記のようなコードを書きたくて悩んでいるのですが、
自分が書いたものは

Dim test as integer
Select Case test
Case 11, 13, 14

Case Else
MsgBox("○")
End Select

以上のように、11,13,14の時は空白で処理をさせないという
ようにして（汗）、とりあえず目的の動作はするのですが、
出来れば11、13、14以外の数字が出た時、という条件を綺麗に
指定したいと思っています。
Not式が使えればいいのですが、Case is <>13～だと矛盾して
しまうようでうまくいきません。

綺麗に11、13、14以外の数が出た時にのみ処理をさせる
条件式の書き方ありましたら、教えていただけないでしょうか？

わかりにくい部分あれば補足いたします。
よろしくお願いします。

回答No.1

coboler · ベストアンサー

Dim test As Integer

Select Case False
Case test = 11 Or test = 13 Or test = 14
MsgBox ("○")
End Select

と書くのはどうでしょうか？
またはif文で

If test <> 11 And test <> 13 And test <> 14 Then
MsgBox ("○")
End If

と書く方法があるかと思います。

お礼

CaseにFalseを用いる方法は知りませんでした。
大変参考になりました。
ありがとうございました。