Private Sub Button1_MouseEnter1(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.MouseEnter

        Button1.BackColor = Color.Aquamarine

        Label1.BackColor = Color.Aquamarine

        Label1.Text = "Mouse Enter Event"

End Sub

Private Sub Button1_MouseLeave1(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.MouseLeave

        Button1.BackColor = Color.Blue

        Label1.BackColor = Color.Blue

        Label1.Text = "Mouse Leave Event"

End Sub

Private Sub Button1_MouseHover1(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.MouseHover

        Label1.Text = "Mouse Hover"

        Label1.BackColor = Color.Brown

        Button1.BackColor = Color.Brown

End Sub

Private Sub Button1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button1.MouseDown

        Button1.BackColor = Color.Bisque

        Label1.BackColor = Color.Bisque

        Label1.Text = "Click Event"

End Sub