Select Case In Vbscript If Statement