Как реализовать инструкцию select в VBScript?

Question

Может ли кто-нибудь рассказать мне, как реализовать команды select в VBScript, аналогичные инструкции switch в C? Было бы здорово, если бы вы представили несколько примеров, поскольку я довольно новичок в VBScript. Благодарю.

Answer 1

Select Case foo 
    Case 1 
     MsgBox "1" 
    Case 2, 3 
     MsgBox "2 or 3" 
    Case Else 
     MsgBox "Something else" 
End Select 

Answer 2

пример только

Select Case strMyVariable 
     Case "One"  Wscript.Echo "1" 
     Case "Two"  Wscript.Echo "2" 
     Case "Three" Wscript.Echo "3" 
     Case Else  Wscript.Echo "Wrong" 
End Select