How do I implement a "wait" in my code?

[Mudgen]

I do I implement eg. "wait for 1 second" then proceed through the code?

I'm not sure what's it's called but I think the Sleep Function would work. Same with a timer.

I think it's :

sleep(1000) ' 1000 = 1 second.

Knight

[MartinLiss]

You can also put your program to "sleep" for any length of time using this API:

Public Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)


------------------
Marty

[ChrisJackson]

Hi Mudgen,

In order to use the Sleep Function, you have to use both Martin and Knight_Vision's code together:


Option Explicit

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Private Sub Form_Load()
Sleep (3000)
End Sub


All the best.

Chris

[Mudgen]

Hello ChrisJackson
I am Writing for Windows NT.
Is your code OK for this?

[MartinLiss]

I'll answer for him/her... Yes.

------------------
Marty

[ChrisJackson]

Thanks Martin. You're right about the Sleep Function working with Windows NT. By the way, it's him.

Chris