Date/Time Format

25/01/2011 - 08:37 von Lothar Geyer | Report spam
In einem fremden Source habe ich folgendes entdeckt:

Function GetDateTime() As String
Dim mNow as Date

mNow = Date
GetDateTime = Format$(Hour(mNow), "00") & ":" & Format$(Minute(mNow),
"00") & ":" & Format$(Second(mNow), "00")

Ich würde das so machen:
GetDateTime = Format$(mNow, "Hh:Nn:Ss")

Was schneller sein dürfte. Gibt es einen Grund, das nach dem ersten
Beispiel zu machen?

Lothar Geyer
 

Lesen sie die antworten

#1 W. Wolf
25/01/2011 - 09:41 | Warnen spam
"Lothar Geyer" schrieb im Newsbeitrag news:
In einem fremden Source habe ich folgendes entdeckt:

Function GetDateTime() As String
Dim mNow as Date

mNow = Date
GetDateTime = Format$(Hour(mNow), "00") & ":" & Format$(Minute(mNow), "00") & ":" & Format$(Second(mNow), "00")

Ich würde das so machen:
GetDateTime = Format$(mNow, "Hh:Nn:Ss")

Was schneller sein dürfte. Gibt es einen Grund, das nach dem ersten Beispiel zu machen?




Weder das Eine noch das Andere gibt ein
Datum zurück, also würde ich erst mal bei
der Benennung der Funktion GetDateTime
anfangen ;-)

Schönen Gruß
W. Wolf

Ähnliche fragen