Sie sind nicht angemeldet.
Zitat von »moe«
zu isdn zeiten hatte ich mir auch einen zeitzähler programmiert, der je nach monatslänge die zeit korrekt rückwärtszählend anzeigte.
im netz wirst du kaum etwas gutes finden, wo nicht etwas dafür verlangt wird.... und ich hab damals ewig gesucht -> letztendlich gab ich auf und hab mich selbst dran gemacht.
für was möchtest du den timer einsetzen und was genau soll er protokollieren?
A64 NC3500+ 939 zu verkauZitat
* We die only once, and for such a long time. *Moliere*
Zitat von »Cyrotech«
Ich habe hier ein kleines Tool, was cobra geschrieben hat. Wenn Du es haben willst, KM an mich.
Quellcode |
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
Option Explicit Private Declare Function GetTickCount Lib "kernel32" () As Long Private Sub Timer1_Timer() Dim H As Single, M As Single, S As Single, MS As Single Dim strH$, strM$, strS$, strMS$ MS = GetTickCount() MS = MS / 1000 H = Int(MS / 3600) MS = MS - H * 3600 M = Int(MS / 60) MS = MS - M * 60 S = Int(MS) MS = Int((MS - S) * 10) strH = CStr(H) strM = Format(CStr(M), "##00") strS = Format(CStr(S), "##00") strMS = CStr(MS) Label1.Caption = strH & ":" & strM & ":" & strS & ":" & strMS End Sub |
-