Advertisement
Guest User

Untitled

a guest
Oct 31st, 2014
143
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.88 KB | None | 0 0
  1.  
  2.  
  3. Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
  4. If CheckBox1.Checked = True Then
  5. CheckBox2.Enabled = False
  6. Else
  7. CheckBox2.Enabled = True
  8. End If
  9. If CheckBox1.Checked = True Then
  10. Button1.Enabled = True
  11. Else
  12. Button1.Enabled = False
  13. End If
  14.  
  15. End Sub
  16.  
  17. Private Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged
  18. If CheckBox2.Checked = True Then
  19. CheckBox1.Enabled = False
  20. Else
  21. CheckBox1.Enabled = True
  22.  
  23. End If
  24.  
  25. If CheckBox2.Checked = True Then
  26. Button2.Enabled = True
  27. Else
  28. Button2.Enabled = False
  29.  
  30. End If
  31. End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement