Public Class Form1

Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged

If Me.CheckBox1.Checked Then

                Label1.Text = "You have selected CheckBox1"

Else

                Label1.Text = "You have cleared CheckBox1"

End If

End Sub

Private Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged

If Me.CheckBox2.Checked Then

                Label1.Text = "You have selected CheckBox2"

Else

                Label1.Text = "You have cleared CheckBox2"

End If

End Sub

Private Sub CheckBox3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox3.CheckedChanged

If Me.CheckBox3.Checked Then

                Label1.Text = "You have selected CheckBox2"

Else

                Label1.Text = "You have cleared CheckBox2"

End If

End Sub

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

Me.Close()

End Sub

End Class