IsLeapYear
function IsLeapYear(Year As Integer) As Boolean
Indicates whether a specified year is a leap year.
Parameters
Example:
Dim iYear iYear = 2009 If IsLeapYear(iYear) Then ' actions End If