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
d = EncodeTime(12, 0, 30, 0)
' Encode a date incl. time
d = EncodeDate(2008, 12, 24) + EncodeTime(12, 0, 30, 0)
|
|