Pastetool #61

URL: , Paste another

Sub Delay(Seconds)
Dim PauseTime, Start
    Start = Timer   ' Set start time.
    Do While Timer < Start + Seconds
        DoEvents    ' Yield to other processes.
    Loop
End Sub

Download code

This visual basic code was pasted on September 25, 2009

Protected with advance Anti-SPAM techniques :)
Coded and designed by Fedmich