Kod:
SELECT CASE a
Case 1,5,6,12
msgbox "a değişkeni 1,5,6 veya 12 rakamlarından birisidir
Case 300 to 500
msgbox "a değişkeni 300 ile 500 arasında bir sayıdır"
case else
msgbox "a değişkeni başka bir değerdir"
END SELECT