VB program to find the leap year

Program to find entered year is leap year or not

Sample :



I can't show you complete code Directly so download full code from below .
Download the output  for the form (design).


Private Sub Command1_Click()
    If Val(Text1.Text) Mod 4 = 0 Then
        Result.Caption = "The year " & Text1.Text & " is leap year"
    Else
        Result.Caption = "The year " & Text1.Text & " is not a leap year"
    End If
End Sub


Full Code :
Output(leapyear.exe)

Full code(leapyear.doc)

Full project(leapyear.zip)

*Note Full project require Visual Basic 6.0