• Home
 · 
• Miscellaneous
 · 
• TimeOut

TimeOut

This is a neat little Sub that will Cause a Pause or "Time Out" in your program.

Inputs
Duration (1 equals 1 Second, .5 equals a Half Second)

Side Effects
This will cause the program to wait the specified duration before continueing.

Rate TimeOut

• 1
• 2
• 3
• 4
• 5

(6(6 Vote))

Sub TimeOut (duration)
StartTime = Timer
Do While Timer - StartTime < duration
  X = DoEvents()
Loop
End Sub