Views

...

Important:

Quaisquer soluções e/ou desenvolvimento de aplicações pessoais, ou da empresa, que não constem neste Blog podem ser tratados como consultoria freelance.

E-mails

Deixe seu e-mail para receber atualizações...

eBook Promo

VBA - Faça o seu código dormir - Pausando-o...

Muito raramente, mas às vezes acontece, alguns perguntam sobre como usar o DoEvents para implementar um período de espera no MS Access. O DoEvents executa um processo deixando que o SO cuide do gerenciamento deste em conjunto com outros eventos rodando naquele momento.)

Podemos colocar o MS Access para dormir? S
im, a API do sono pode ser usada para isso. Oberve o exemplo abaixo, quando executá-lo notará uma demora antes do Msgbox aparecer na tela. A duração pode ser aumentada.

Para o uso normal a partir do seu código, basta colocar uma chamada para a SUB com um tempo apropriado nos milissegundos.

This code was originally written by Dev Ashish.
Sub sapiSleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)
 
Sub sSleep(lngMilliSec As Long)
       If lngMilliSec > 0 Then        
              Call sapiSleep(lngMilliSec)    
       End If
End Sub
 
Sub sTestSleep()
       Const cTIME = 1000 'in MilliSeconds    
       Call sSleep(cTIME)   
 
       MsgBox "Antes de evocar este Msgbox, Estive dormindo por: " & cTIME & " milisegundos."
End Sub

 
André Luiz Bernardes

Twitter: @officespecialis
            @brzexceldevelop
            @brzaccessdevel

eBooks VBA na AMAZOM.com.br

LinkWithinBrazilVBAExcelSpecialist

Related Posts Plugin for WordPress, Blogger...

Vitrine