Revision [17559]
This is an old revision of KeyPgTimeserial made by DkLwikki on 2015-04-01 13:12:34.
TIMESERIAL
Gets a ProPgDates Date Serial for the specified hours, minutes, and seconds
Syntax:
KeyPgDeclare declare KeyPgFunction function TimeSerial ( KeyPgByval byval hour KeyPgAs as KeyPgLong long, KeyPgByval byval minute KeyPgAs as KeyPgLong long, KeyPgByval byval second KeyPgAs as KeyPgLong long ) KeyPgAs as KeyPgDouble double
Usage:
#include "vbcompat.bi"
result = TimeSerial( hours, minutes, seconds )
result = TimeSerial( hours, minutes, seconds )
Parameters:
hour
number of hours, in the range 0-23
minute
number of minutes
second
number of seconds
Return Value:
Returns a ProPgDates date serial containing the time formed by the values in the hours, minutes and seconds parameters.The date serial returned has no integer part.
Description:
hours must be specified in the range 0-23
The compiler will not recognize this function unless vbcompat.bi or datetime.bi is included.
Examples:
#include "vbcompat.bi"
Dim ds As Double = DateSerial(2005, 11, 28) + TimeSerial(7, 30, 50)
Print Format(ds, "yyyy/mm/dd hh:mm:ss")
Dim ds As Double = DateSerial(2005, 11, 28) + TimeSerial(7, 30, 50)
Print Format(ds, "yyyy/mm/dd hh:mm:ss")
Differences from QB:
- Did not exist in QB. This function appeared in PDS and VBDOS
See also:
- ProPgDates Date Serials
- KeyPgDateSerial DateSerial
- KeyPgTimeValue TimeValue
- KeyPgDateValue DateValue
Back to Date and Time Functions