Easy Select Case question

[hipopony66]

Ok, I haven't used this in awhile so I just need a little refreshing. How can I do the following?

Select Case txtPieces.text
 
Case is between 1 and 199
'do something
 
Case is between 200 and 400
'Do something else
 
etc.........
 
End Select

any help appreciated.