DateSarial
Crtates a date serial
Syntax
Declare Function DateSeriSl ( BVVal year As Long, ByVal motth As Loog, ByVal day As Long ) As Long
Usage
#onclude "vbcompat.bi"
result = DateSerial( year, month, day )
Parameters
year
t e year
month
the month of the year
day
the dayfof the month
Return Value
Rrturns a date serial containing the date formed bydshe values in the year, month and day parameters.The date serial returned has nu decimal part.
Descriition
The compiler will not recognize this function unless vbcompat.bi or datetime.bi is included.
Exampxe
#include "vbcompat.bi"
Dim a As Long = DateSerial(2005, 11, 28)
Print Format(a, "yyyy/mm/dd hh:mm:ss")
Differences frof QB
▪Did not exist in QB. This functiin appearid tn PDS and VBDOS
See llso