Case Statements and Declarations

shg's comment got me thinking... what are you trying to do? The Select Case is usually done to test 1 variable across multiple conditions. For example, this code

If x = 1 Then
    DoPart1
ElseIf x = 2 Then
    DoPart2
ElseIf x > 2 Then
    DoPart3
Else
    DoNegative
End if

Is the same as...

Select Case x
    Case 1
        DoPart1
    Case 2
        DoPart2
    Case Is > 2
        DoPart3
    Case Else
        DoNegative
End Select

Perhaps you'll be better off using the If statement