Thank You very much Jake.
"Jake Marx" wrote in message
...
Hi Bill,
Bill Kuunders wrote:
Is there a way to flash a short message using a form for a time far
shorter than a second?
Yes - you can use the GetTickCount API function to do something like that:
Private Declare Function GetTickCount Lib "kernel32" () As Long
Sub demo()
Dim lCount As Long
frmMessageBox.Show vbModeless
lCount = GetTickCount
Do While GetTickCount < (lCount + 500)
DoEvents
Loop
Unload frmMessageBox
End Sub
--
Regards,
Jake Marx
www.longhead.com
[please keep replies in the newsgroup - email address unmonitored]