SetTimeout: Difference between revisions
Jump to navigation
Jump to search
No edit summary |
|||
Line 21: | Line 21: | ||
Function nextAction() | Function nextAction() | ||
MsgBox "nextAction" | MsgBox "nextAction" | ||
End Function | |||
</pre> | |||
Do an interval | |||
<pre> | |||
Dim timerRef, i | |||
i = 0 | |||
timerRef = SetInterval(nextAction, 1000) | |||
Function nextAction() | |||
MsgBox "nextAction " & i | |||
i = i + 1 | |||
If i > 3 Then ClearInterval(timerRef) | |||
End Function | End Function | ||
</pre> | </pre> |
Revision as of 13:41, 12 February 2013
timerRef = SetTimeout (function, milliseconds)
ClearTimeout (timerRef')
timerRef = SetInterval (function, milliseconds)
ClearInterval(timerRef')
Description
SetTimeOut is used to schedule an event for a future time, where function is the name of the Sub or Function to be called, and milliseconds is how long in the future it is to be called. Execution does not halt at this statement – it continues with the next statement. It returns a reference to the timeout action which can be used in ClearTimeout.
SetInterval works like SetTimeout, except function is called repeatedly.
Example
Rem SetTimeout statement T=SetTimeout(nextAction,3000) Function nextAction() MsgBox "nextAction" End Function
Do an interval
Dim timerRef, i i = 0 timerRef = SetInterval(nextAction, 1000) Function nextAction() MsgBox "nextAction " & i i = i + 1 If i > 3 Then ClearInterval(timerRef) End Function
Output
(nextAction appears 3 seconds later)