title image


Smiley Re: "Wait"-Funktion in Access 97
Hallo Barbara,deklariere folgende Sub:Private Declare Sub Warten Lib "kernel32" (ByVal ms as long), wobei Warten der Name der Sub ist und ms die Millisekunden für den Aufruf. 1000ms sind ca. 1 Sek.in der Private Sub kannst Du dan wie folgt vorgehen:Private Sub Bitte_Warten()...............DoEventsDoCmd.OpenForm "frmBitteWarten"DoEvents ' Ohne DoEvents funktioniert das ganze nicht (Access Bug)'hier kommt die Ausführung hin, die der User nicht mitbekommen sollWarten 1000 'unterbricht die Verarbeitung für eine SekundeDoCmd.Close acForm, "frmBitteWarten"End Sub' Ohne DoEvents funktioniert das ganze nicht (Access Bug)

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: