Estou tentando descobrir como fazer vários eventos acontecerem com apenas uma condição usando .vbs. (Aqui tentei usar a instrução case.) Existe um comando desse tipo ou eu tenho que reescrever o comando para cada linha? (Isso deve ser digitado no bloco de notas por tê-lo já ativado em linhas anteriores de código.)

  msgbox("I was woundering how old you are.")
    age=inputbox("Type age here.",,"")
    Select Case age
    Case age>24
        x=age-24
        WshShell.SendKeys "I see you are "&x&" years older than me."
        WshShell.SendKeys "{ENTER}"
    Case age<24
        x=24-age
        WshShell.SendKeys "I see you are "&x&" years younger than me."
        WshShell.SendKeys "{ENTER}"
    Case age=24
        WshShell.SendKeys "Wow were the same age!"
        WshShell.SendKeys "{ENTER} "
    End Select