Day

Declare Function Day ( ByVal date_serial As Double ) As Long

#include "vbcompat.bi"
result = Day( date_serial )

date_serial

Returns the day of the month from a variable containing a date in Date Serial format.

The compiler will not recognize this function unless vbcompat.bi is included.

#include "vbcompat.bi"

Dim ds As Double = DateSerial(2005, 11, 28)

Print Format(ds, "yyyy/mm/dd "); Day(ds)

• Did not exist in QB. This function appeared in PDS and VBDOS
  
  

• Date Serials