title image


Smiley Da steht doch genau, wie man das macht!


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



Public Function Wait (MilliSekunden As Double)

Dim I As Double, Ende As Double

Ende = MilliSekunden / 100

Do While I < Ende

Sleep 100

DoEvents

I = I + 1

Loop

End Function



... das ist weitaus eleganter und vor allem seiteneffektfreier als ein Formulartimer!


Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: