[2005] Select CASE [RESOLVED]

[selanec]

If Ctype(control, TextBox).Id.StartsWith("txtTest1") Then
  'do something
ElseIf Ctype(control, TextBox).Id.StartsWith("txtTest2") Then
 'do something
ElseIf Ctype(control, TextBox).Id.StartsWith("txtTest3") Then
 'do something
ElseIf Ctype(control, TextBox).Id.StartsWith("txtTest4") Then
 'do something
 '{more if statements}
Else If

Now i want to recode this with using SELECT CASE.
How do i use select case when i want that each case finds if certain control's id startswith given value?

Thanks