Kann man anstatt der If..then schleifen nicht auch die Select Case anweisung nehmen?

"Select Case x

Case x = 1
[Anweisung]

case x = 2

[anweisung]

Case else

Print "Fehler" [z.B.]


End Select