>>62
その通り。if文を使う限りはそうなる。
ちなみにVBは a = 1 or ... というようにかっこで囲む必要がない。

>>63の方法を使わなければならない。
ひとつ気がついたけど、
> Case 1 7 13 17 19 20 21 20 59
は
Case 1, 7, 13, 17, 19, 20, 21, 20, 59
という風にコンマで区切る必要があるのでは。