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