Möchte eine For Next Schleife verzögert ablaufen lassen,
die Verzögerung soll 100ms betragen. Bei mir funktionieren aber nur Werte wie 1s, 2s usw. ...
Kann man auch Werte auf die Millisekunde genau realisieren?
Möchte eine For Next Schleife verzögert ablaufen lassen,
die Verzögerung soll 100ms betragen. Bei mir funktionieren aber nur Werte wie 1s, 2s usw. ...
Kann man auch Werte auf die Millisekunde genau realisieren?
versuchs mit Sleep
Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
im Code dann folgender Aufruf
Sleep 5 ' 5 ms
Gruß
RAnton
Die Verzögerung klappt,
jedoch wird die geänderte Position meines Labels (siehe Code) erst nach Abarbeiten der Schleife sichtbar:
For i = 1 To 200
Sleep 10 ' 100 ms
UserForm1.Label1.Left = 6 + i
Next
Das Label soll jedoch die ganze Zeit sichtbar bleiben...
füge im Code noch folgendes ein ...
UserForm1.Repaint oder Me.Repaint
Gruß
Sigi