[Resolvido]Código timer para esperar antes de executar outra ação

Amigos há algum código tipo timer que eu possa colocar entre dois outros códigos para que o código seguinte ocorra num tempo x!? Sei que temos o evento No timer e abaixo dele o cronômetro, porém, estes já estão sendo utilizados para uma macro e o código que preciso de timer está no evento ao carregar entendem?

Para esclarecer mais é o seguinte... o formulário em questão é o formulário de abertura tipo splash que no timer de 5000 milésimos ele fecha e abre o formulário principal com seu formulário de fundo etc... o evento que eu quero que ocorra ao carregar deste mesmo formulário é mais rapido que 5000 milésimos, pois ele deverá ocorrer de 200 em 200 milésimos dentro do espaço do tempo de 5000 milésimos, quantas vezes forem possíveis!

Ou seja resumindo esse evento ao carregar tem um timer diferente do intervalo do cronômetro que é de 5000 milésimos!



Tem algum código que realiza essa ação de espera amigos?

Para opinar mais efetivamente seria interessante conhecer os detalhes para saber melhor aonde implementar a solução. Mas, você pode ter pelo menos duas saídas: usar a função Sleep ou colocar um temporizador para capturar os segundos decorridos. No caso do Sleep, cole a função abaixo em um novo módulo:

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

No local que quiser dormir, coloque o tempo do sono em milisegundos:

    Call Sleep(3000) ' 3 segundos

Se não der certo, comente mais a estrutura do seu aplicativo.

É sempre aconselhavel passar a variavel de tempo para inteiro;

http://maximoaccess.forumeiros.com/t995-provocar-pausa-numa-instrucao

Obrigado amigos! Resolvido!

Grato pelo retorno. E bem lembrado JPaulo.

Valew.