Problem
Visual Basic 6 unterstützt von Haus aus keine Pausen im Programmablauf. Der Code wird, ohne Unterbrechung, abgearbeitet. Dies kann in bestimmten Situationen zu Problemen führen, z.B. wenn bei Datenbankzugriffen, nach einem “DROP TABLE” direkt eine neue Tabelle mit gleichem Namen erstellt werden soll und die Datenbank die Tabelle nicht schnell genug löschen konnte.
Lösung
Am einfachsten bedient man sich einer API-Funktion, um eine Pause zu realisieren. In der “kernel32.dll” steckt die API-Funktion “Sleep”. Mit dieser kann der Programmablauf unterbrochen werden.
API Deklaration:
Private Declare Sub Sleep Lib "kernel32" Alias _ "Sleep" (ByVal dwMilliseconds As Long)
Aufruf:
Sleep 1000
Hinter dem Befehl “Sleep” wird die Zeit der Unterbrechung in Millisekunden angeben (hier: 1000 Millisekunden = 1 Sekunde).