Web Development

Ask something
Discussion Locked

three fields check

0 helpful
7 replies

by doublex_us

Closed to new repliesThis discussion is closed. It stays readable, but it takes no new replies.

I have three fields. When one is checked I ant the other two check and turned to blank.
can any help?

7 replies

by john_wills

Put an on-change event procedure on the box you want to affect the others. In the procedure test whether the change is to on: if so, set the others to off. I am assuming that you are using VB or Access, but essentially the same technique should workin other GUIs.

by chris.lewis

For VB/VBA in a form...

Dim bChanging As Boolean

Private Sub Check1_click()
If bChanging Then Exit Sub
If Check1.Value = vbChecked Then
bChanging = True
Check2.Value = vbUnchecked
Check3.Value = vbUnchecked
bChanging = False
Else
bChanging = True
Check2.Value = vbChecked
Check3.Value = vbChecked
bChanging = False
End If
End Sub

Private Sub Check2_Click()
If bChanging Then Exit Sub
If Check1.Value = vbChecked Then
bChanging = True
Check1.Value = vbUnchecked
Check3.Value = vbUnchecked
bChanging = False
Else
bChanging = True
Check1.Value = vbChecked
Check3.Value = vbChecked
bChanging = False
End If
End Sub

Private Sub Check3_Click()
If bChanging Then Exit Sub
If Check3.Value = vbChecked Then
bChanging = True
Check1.Value = vbUnchecked
Check2.Value = vbUnchecked
bChanging = False
Else
bChanging = True
Check1.Value = vbCheckedCheck2.Value = vbChecked
bChanging = False
End If
End Sub

This discussion is closed to new replies.