VB6: gibt es keine PAUSE-Funktion ?

Hallo,

ich möchte ganz einfach, dass VB6 mehrere Optionen nacheinander ausführt - aber nicht sofort, sondern mit einem bestimmten Abstand.

von Früher kenne ich PAUSE oder DELAY Funktionen.
Gibt es sowas auch in VB ??

Danke für Antworten.

Werner

Hallo Werner,

soweit ich weiss gibt es keinen direkten Befehl dafür.
Aber du kannst es so machen :smile:

Variante 1:

Platziere in ein Modul folgende Prozedure.

Public Sub Pause(Seconds As Single)
 Dim Timer1 As Single, Timer2 As Single, currentDate As Date
 currentDate = Date
 Timer1 = Timer + Seconds
 Timer2 = Timer1 - 86400 '24 Stunden

 While ((Timer() 

Aufrufen tust du dann die Pause über pause 1.5. Dies würde eine Pause von 1,5 Sekunden ergeben.

Variante 2:

Über die Api Sleep

Declariere diese Api.


    
    Declare Sub Sleep Lib "kernel32" (Byval dwMilliseconds As Long)




danach kannst du in deinem Prog eine Pause mit Sleep 1500 machen :smile:

MFG Alex


> <small>[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]</small>

Danke für den Tipp !!

Werner

hallo

ich würde das über mit dem sleep api call machen

http://support.microsoft.com/kb/q231298/

gruss

Hallo, musst du selbst schreiben.

in die General Deklarationen:
Private Declare Sub Sleep Lib „kernel32“ (ByVal dwMilliseconds As Long)

dann dort wo benötigt: sleep 5000

macht sich auch ganz gut bei intensiven Berechnungen damit die Prozessorlast nicht ständig auf 100 % hängt, einfach ein sleep 10 rein

schon ist es besser.

Gruss