function EncodeTime(Hour As Integer, Min As Integer, Sec As Integer, MSec As Integer) As DateTime
|
Returns a DateTime value for a specified Hour, Min, Sec, and MSec.
Parameters
| • | Hour ... Integer value. Hours, valid values are 0 through 23. |
| • | Min ... Integer value. Minutes, valid values are 0 through 59. |
| • | Sec ... Integer value. Seconds, valid values are 0 through 59. |
| • | Msec ... Integer value. Milliseconds, valid values are 0 through 999. |
Example:
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)
|
|