|
IsLeapYear
(XAPI2000)
Deklaration VB 6.0
Function IsLeapYear (ByVal Y As Long) As Boolean
Deklaration VB.NET
Function IsLeapYear (ByVal Y As Integer) As Boolean
Beskrivning
Testar om ett år är ett skottår. Parametern Y specificerar
det år som ska testas.
Returvärden
Funktionen returnerar True om det testade året är ett
skottår eller False om det inte är det. |
Exempel (VB 6.0)
If IsLeapYear(2008) Then
MsgBox "År 2008 är ett skottår!"
End If
Exempel (VB.NET)
If IsLeapYear(2008) Then
MsgBox("År 2008 är ett skottår!")
End If
|
