RosettaCodeData/Task/Sleep/VBScript/sleep.vbs
2026-04-30 12:34:36 -04:00

4 lines
202 B
Text

iSeconds=InputBox("Enter a time in seconds to sleep: ","Sleep Example for RosettaCode.org")
WScript.Echo "Sleeping..."
WScript.Sleep iSeconds*1000 'Sleep is done in Milli-Seconds
WScript.Echo "Awake!"