Syntax
|
DoEvents[()]
|
Description
|
Yields control to other applications, returning an
Integer
0.
|
Comments
|
This statement yields control to the operating system, allowing other applications to process mouse, keyboard, and other messages.
If a
SendKeys
statement is active, this statement waits until all the keys in the queue have been processed.
|
Example
|
The following routine explicitly yields to allow other applications to execute and refresh on a regular basis.
Sub Main()
Open "test.txt" For Output As #1
For i = 1 To 10000
Print #1,"This is a test of the system and such."
r = DoEvents
Next i
MsgBox "The DoEvents return value is: " & r
Close #1
End Sub
|
See Also
|
DoEvents (statement).
|