Sie sind nicht angemeldet.
Lieber Besucher, herzlich willkommen bei: Aqua Computer Forum. Falls dies Ihr erster Besuch auf dieser Seite ist, lesen Sie sich bitte die Hilfe durch. Dort wird Ihnen die Bedienung dieser Seite näher erläutert. Darüber hinaus sollten Sie sich registrieren, um alle Funktionen dieser Seite nutzen zu können. Benutzen Sie das Registrierungsformular, um sich zu registrieren oder informieren Sie sich ausführlich über den Registrierungsvorgang. Falls Sie sich bereits zu einem früheren Zeitpunkt registriert haben, können Sie sich hier anmelden.
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 |
-