Makro für aktuelle Uhrzeitanzeige in einem Eingabeformular

Antwort erstellen


BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet

Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Makro für aktuelle Uhrzeitanzeige in einem Eingabeformular

von franky » Sa, 03.03.2007 18:07

Hallo Toxitom,

vielen Dank, der Code hat mir schon weitergeholfen. Da ich gerade
erst in den Anfängen stecke für dieses Makro, habe ich noch
keine Codes.

Ich möchte mich da langsam rantasten und testen.
Danke für Deine schnelle Hilfe.

Gruß Franky

von Toxitom » Do, 01.03.2007 08:25

Hey Franky,

dein Zeitfeld hat eine Eigenschaft "Time" sowie eine Eigenschaft "TimeFormat", womit du den Wert vorgeben kannst.
"Time" wird dabei als Long übergeben im Format HHMMSS00, TimeFormat als Short, wobei die wichtigsten bedeuten:
1 : HH:MM (24 Stunden anzeige)
2 : HH:MM:SS (24 Stunden).
Um nun die aktuelle Zeit in das geforderte Format umzuwandeln, nutzt du folgenden code:

Code: Alles auswählen

dim vTime as long
vTime = cLng(format(hour(time), "00") & format(minute(time), "00") & _ format(second(time), "00") & "00")
REM und den jetzt dem Kontrollelement zuweisen:
oCtl.time = vTime
Da du weiter Details deines Codes nicht verrätst, kann ich detaillierter nicht antworten ;-)

Viele Grüße
Thomas

Makro für aktuelle Uhrzeitanzeige in einem Eingabeformular

von franky » Mi, 28.02.2007 19:17

Hallo liebes Forum,

ich habe ein Eingabeformular erstellt und möchte nun, das wenn ich einen
Command Button drücke, die aktuelle Uhrzeit in das TimeField geschrieben
wird. Ich habe bis jetzt noch keine Lösung gefunden.

Bin für jede Hilfe dankbar.


Gruß Franky

Nach oben