You could put the app to sleep by using API:

Code:
'Declare
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)


'formcode to make it sleep
dim x as integer

x = '# of sleep
Call Sleep(x)
[This message has been edited by Inhumanoid (edited 12-01-1999).]