Create a delay

Brian Element's picture
Submitted by Brian Element on Wed, 09/12/2012 - 20:24

This little snippet will allow you to delay your code by x number of seconds.  Just use the call wait(x) where x is the number of seconds you want the script to pause.

Snippet: 
Sub Wait(tSecs As Single)
       ' Timer to create a pause
      Dim sngSec As Single
          
      sngSec = Timer + tSecs
      Do While Timer < sngSec
             
      Loop
End Sub