Views

Histats

Vitrine

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? Sim, 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

✔ VBA Brazil®

✔ VBA Brazil®
brazilsalesforceeffectiveness@gmail.com
Related Posts Plugin for WordPress, Blogger...
diHITT - Notícias