IsLeapYear |
Syntax:
IsLeapYear(date)
Description:
Returns true if date is in a leap year, and false otherwise.
Parameters:
|
Parameter |
Description |
|
date |
A valid date string or date variable. |
Example:
Sub Main
If IsLeapYear (Now()) Then
MsgBox "This is a leap year"
Else
MsgBox "This is not a leap year"
End Sub
See Also:
FirstDateOfDayInMonth, FirstDateOfDayInQuarter, FirstDateOfDayInYear, LastDateOfDayInMonth, LastDateOfDayInQuarter, LastDateOfDayInYear, LastDateOfWeek, LastDayOfMonth, LastDayOfQuarter, LastDayOfYear