program 4: year is leap or not

program to check entered year is leap or not.

-----------------------------------------code---------------------------------------------------------

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        If TextBox1.Text Mod 4 = 0 Then

            MsgBox("Leap year", , "Message")

            TextBox1.Text = ""

        Else

            MsgBox("Not Leap year", , "Message")

            TextBox1.Text = ""

        End If

    End Sub

End Class

-----------------------------------------output----------------------------------------------------

codestrew

codestrew