Hi,
hab' gerade ein Problem mit VB6.
Zum testen habe ich mal folgendes gemacht:
Ein Formular mit einem Timer und einem Label.
Alle 10ms soll der Wert ein Wert hochgezählt werden und im Label angezeigt werden.
(Ich weiß, die VB-Timer sind wohl nicht gerade genau)
Wenn ich nun das Teil während der Laufzeit verschiebe, bleibt mein Timer für etwa eine halbe Sekunde bis etwa eine Sekunde stehen.
Allerdingsnur beim ersten "Anfassen"
Alle weiteren Verschiebevorgänge bringen den Timer nicht mehr aus dem Tritt.
Gehe ich auf die Clip Controls (verkleinern oder vergrößern) und halte die Maustaste gedrückt, bleibt das Teil komplett stehen.
Kann man das irgendwie verhindern?
(ohne das Formular zu disablen)
Code:
Public a As Integer
Private Sub Form_Load()
Timer1.Interval = 10
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
a = a + 1
If a > 1000 Then
a = 0
End If
Label1.Caption = a
End Sub
EDIT:hab' gerade gemerkt, ab und zu bleibt der Timmer auch beim erneuten anfassen stehen.
Und in VB.Net ist der Effekt übrigens der gleiche, habe ich gerade festgestellt.
Gruß
Christopher
Lesezeichen