Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
If CheckBox1.Checked = True Then
Button1.Enabled = True
ElseIf CheckBox1.Checked = False Then
Button1.Enabled = False
End If
End Sub