Case Statements in VBScript

I have been doing some with XSL transformations, and VBScript has been my enemy recently. What little grey matter still knows Visual Basic 6 is hit and miss for VBScript. In my case I was trying to create a case statement which in VB can be formatted as follows:

Select Case Numb
    Case 32 to 50    'This is legal in VB 6
    Case 65,66,67,67
    Case Else
End Select

Unfortunately you have to do something like this in VBScript…

Select Case Numb
    Case 32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50
    Case 65,66,67,67
    Case Else
End Select

… not very elegant but I am not sure if I have any options.