Is this a leap year

Dim leapYear As Boolean = Date.IsLeapYear(Now.Year)

MsgBox(String.Format("{0} is a leap year: {1}", Now.Year, leapYear))

Related posts:

1. Number of days in a month Dim daysInMonth As Integer = Date.DaysInMonth(Now.Year, Now.Month) MsgBox(String.Format("Number of days...
2. Current date and time Dim rightNow As Date = Now Dim result As New ...
3. Get the exact date and time this will display the exact date and time when the...

Related posts brought to you by Yet Another Related Posts Plugin.