Finden Sie, wenn das Jahr Schaltjahr VB ist

If Year Mod 4 = 0 Then
	Year = "Leap"
Else
    Year = "Non-Leap"
Salty Joe