Curious what we can do for you?
©2024 Blue Polar. All rights reserved.
Public Function Day(ByVal InputDate As Date) As Long
Returns the day part of the specified date/time (1-28/30/31)
Dim lDate As Date = #2099-12-31#
SendDebug Year(lDate) 'Prints 2099
SendDebug Month(lDate) 'Prints 12
SendDebug Day(lDate) 'Prints 31