5 lines
202 B
VB.net
5 lines
202 B
VB.net
|
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!"
|