Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Zeit-Screen-Shot
Autor: VD-Projekt
Datum: 05.11.03 11:39
Ich habe folgenden Code für einen 30min-Countdown: Private Sub Timer1_Timer() Dim D1 As Double D1 = DateAdd("n", 30, Int(Now)) Label1.Caption = Format(D1 - Now, "hh:mm:ss") End Sub das problem ist hier, dass die Differenz immer 30 min bleibt, da ja in beiden Faktoren "Now" drin ist. Ist es möglich, einen "Zeit-Screen-Shot" zu machen, damit ich in "D1" die aktuelle Zeit zu dem einen Zeitpunkt habe und der sich nicht ändert, damit ich auch wirklich einen Countdown habe. Bitte nix mit "TimeSerial" oder so, denn der Zeitpubkt, zu dem der Timer ausgelöst wird, ist nicht bekannt, soll aber von da an immer 30 min betragen. vd-projekt

Zeit-Screen-Shot	510	VD-Projekt	05.11.03 11:39
Re: Zeit-Screen-Shot	283	Wolfgang	05.11.03 12:29

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