case tricks

Is there a way to select a range of values with the case statement? Here is my current method

Case 1, 2, 3, 4, 5, 6, 7, 8, 9

and I thought that there had to be an easier way. Also, can you use Or, And, and < > with cases? I'm interested in hearing any tips on the subject, thanks in advance.

Select True
	Case (a>10 And a<20)
		Print "a>10<20"
End Select

select true
case a*a + b*b = c*c
end select