Identify LeapYear using VB.NET

Check LeapYear using VB.NET

Sub CheckLeapYear()

Dim MyDate As DateTime

MyDate = New DateTime(2008, 8, 15)

If DateTime.IsLeapYear(MyDate.Year) = True Then

MsgBox("Specified year is a leap year")

End If

End Sub