Forum: PC-Programmierung VB 2008 Timer hält nicht an


von andy (Gast)


Lesenswert?

Hallo,ich habe folgendes Problem.Ich habe eine Form mit nur einem Button 
drauf und folgendem Code:

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As 
System.EventArgs) Handles Button1.Click

        Timer1.Enabled = True

    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As 
System.EventArgs) Handles Timer1.Tick

        MsgBox("Ende")
        Timer1.Enabled = False
    End Sub

End Class

Also normal sollte der timer nach einem Buttonklick den Timer 
starten,klappt auch.Dann sollte einen MSGBOX angezeigt werden und der 
Timer angehalten werden.Die MSGBOX wird aber genau 49 mal angezeigt.
Wäre nett,wenn mir das jemand erklären könnte.

gruss

andy

von andy (Gast)


Lesenswert?

Hallo,als ergänzung.Wenn das ' Timer1.Enabled = False '
über dem ' MsgBox("Ende") ' steht,klappts einwandfrei.

gruss

Andy

von der mechatroniker (Gast)


Lesenswert?

In der ersten Variante wird die Anweisung
1
Timer1.Enabled = False
erst ausgeführt, wenn die MessageBox vom User mit Ok bestätigt wurde. In 
der Zwischenzeit können sich ein paar Timerereignisse stapeln.

Lösung: hast du ja schon genannt.

von andy (Gast)


Lesenswert?

Hallo,danke für die antwort.Es hat mich nur gewundert,das es immer genau 
49 Boxes waren,egal welchen Intervall ich eingestellt hatte.

gruss

Andy

Bitte melde dich an um einen Beitrag zu schreiben. Anmeldung ist kostenlos und dauert nur eine Minute.
Bestehender Account
Schon ein Account bei Google/GoogleMail? Keine Anmeldung erforderlich!
Mit Google-Account einloggen
Noch kein Account? Hier anmelden.