IsLeapYear
function IsLeapYear(Year As Integer) As Boolean
Prüft, ob ein Jahr ein Schaltjahr ist.
Parameter
Beispiel:
Dim iYear iYear = 2009 If IsLeapYear(iYear) Then ' actions End If