It has its uses though.

First one to be true in the following order, or fall through, (And it's inverse)

Select Case True
Case X Is GetType(Double)
Case X Is GetType(Single)