半角英数判別するには？ (ID:122215)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 VBSのほうでも質問よいのでしょうか？ 教えてもらえないでしょうか 小文字半角英数と大文字半角英数と半角数字の判別をするのを作っているのですが Select Case Mid(val,1,1) Case "a" To "z" kazu="半角英小文字" Case "A" To "Z" kazu="半角英大文字" Case "0" To "9" kazu="半角数字" Case Else kazu="それ以外" End Select 大体こんな感じにしたいのですがToのせいなのかエラーが出ます これってA,B,C,D,E・・・という風に並べるしかないんでしょうか？ だれかお願いいたします