одно условие, несколько событий

Я пытаюсь выяснить, как сделать несколько событий с одним условием, используя .vbs. (Здесь я попытался использовать оператор case.) Есть ли такая команда, или мне нужно переписывать команду для каждой строки? (Это должно быть набрано в блокноте, если он уже активирован в предыдущих строках кода.)

  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

Ответы на вопрос(2)

Ваш ответ на вопрос