|
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).
|
CIMPLICITY
