EncodeTime

Top  Previous  Next

function EncodeTime(Hour As Integer, Min As Integer, Sec As Integer, MSec As Integer) As DateTime

 

Liefert einen DateTime-Wert, der aus den Werten Stunden, Minuten, Sekunden und Millisekunden berechnet wird.

 

Parameter

 

Hour ... Integer-Wert. Stunden, gültige Werte sind 0 bis 23.
Min ... Integer-Wert. Minuten, gültige Werte sind 0 bis 59.
Sec ... Integer-Wert. Sekunden, gültige Werte sind 0 bis 59.
Msec ... Integer-Wert. Millisekunden, gültige Werte sind 0 bis 999.

 

Beispiel:

Dim d
 
' Encode a time
= EncodeTime(12, 0, 30, 0)
 
' Encode a date incl. time
= EncodeDate(2008, 12, 24) + EncodeTime(12, 0, 30, 0)