RosettaCodeData/Task/Sleep/VBScript/sleep.vbs

5 lines
202 B
Text
Raw Permalink Normal View History

2026-04-30 12:34:36 -04:00
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!"