Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB06 Timer reset durchführen
Autor: Wipss
Datum: 11.03.06 22:29
Hallo zusammen Wie kann man einen timer reset durchführen, d.h. so das die angezeigte Zeit wieder auf 00:00:00 gesetz wird mein code sieht momentan wie folgt aus: Option Explicit Public dProgStart As Date Private Sub cmd_Reset_Click() If Timer1.Enabled = False Then dProgStart = CDate(CStr(Date) & " 00:00:00") label1.Caption = Format("00:00:00") und hier funtz nicht mehr so richtig. Der Label wird zwar auf 00:00:00 gestez der Timmer aber nicht End Sub Private Sub cmd_Start_Click() Timer1.Enabled = True Timer1.Interval = 1000 dProgStart = CDate(CStr(Date) & " 00:00:00") End Sub Private Sub cmd_Stop_Click() Timer1.Enabled = False End Sub Private Sub Form_Load() Timer1.Enabled = False Timer1.Interval = 0 End Sub Private Sub Timer1_Timer() Static lSekTimer As Long Dim n As Date lSekTimer = lSekTimer + 1 n = DateAdd("s", lSekTimer, dProgStart) label1.Caption = Format(n, "hh:mm:ss") End Sub kann mir vielleicht helfen danke schon mal vorab Wipss

VB06 Timer reset durchführen	1.250	Wipss	11.03.06 22:29
Re: VB06 Timer reset durchführen	859	vbtricks	12.03.06 17:24

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen