Cheak boxes .value help

[ichar]

basically i've got two chk boxes. one called chkExtension and one called chkSpecialEvent.

When chkSpecailEvent is turned on (i.e. the tick is put in thier) both chkExtension and chkSpecialEvent must be checked.

when When chkSpecailEvent is turned off(i.e. the tick is taken out) both chkExtension and chkSpecialEvent must not be checked.

When chkExtension is turned on (i.e. the tick is put in thier) chkExtension must stayon, while chkSpecailEvent is turned off.

When chkExtension is turned okk(i.e. the tick is taken out) chkExtension must stayon, while chkSpecailEvent is turned off.

Okay i hope thats clear. now i'm using this code

Private Sub chkExtension_Click()
    If chkExtension.Value = True Then
        chkSpecialEvent.Value = False
        chkExtension.Value = False
    ElseIf chkExtension.Value = False Then
        chkSpecialEvent.Value = False
        chkExtension.Value = True
    End If
End Sub
 
Private Sub chkSpecialEvent_Click()
    If chkSpecialEvent.Value = 1 Then
        chkSpecialEvent.Value = 0
        chkExtension.Value = 0
    ElseIf chkSpecialEvent.Value = 0 Then
        chkSpecialEvent.Value = 1
        chkExtension.Value = 1
    End If
    
End Sub

but when i run it, it says out of stack? not a clue what that means. could anyone help me?

[MartinLiss]

It means that you are in an infinite loop in that one of your changes to a value causes another to be changed which causes the original to be changed, etc.

[MartinLiss]

Looking at your requirements closely shows that they are contradictory.

The first two basically say that the value of chkExtension must be the same as the value of chkSpecialEvent, while the next two contradict that.

[ichar]

if chkSpecialEvent is on, then chkExtension must be on

chkExtension can be on while chkSpecialEvent is off

but if chkSpecialEvent is tured off then chkExtension must be tured off at the same time

does that make more sence?

[brucevde]

Make use of the third possible State (vbGrayed) for the Value property and disable chkExtension when chkSpecialEvent is checked.

Try this code to see if it gives you the functionality you want.

Private Sub chkExtension_Click()
    If chkExtension.Value = vbChecked Then
        chkSpecialEvent.Value = vbUnchecked
    End If
End Sub
 
Private Sub chkSpecialEvent_Click()
    If chkSpecialEvent.Value = vbChecked Then
        chkExtension.Value = vbGrayed
        chkExtension.Enabled = False
    Else
        chkExtension.Value = vbUnchecked
        chkExtension.Enabled = True
    End If
End Sub

If you don't want to disable chkExtension use this code.

Private Sub chkExtension_Click()
    If chkExtension.Value = vbChecked Then
        chkSpecialEvent.Value = vbUnchecked
    ElseIf chkSpecialEvent.Value = vbChecked Then
        chkExtension.Value = vbGrayed
    End If
End Sub
 
Private Sub chkSpecialEvent_Click()
    If chkSpecialEvent.Value = vbChecked Then
        chkExtension.Value = vbGrayed
    Else
        chkExtension.Value = vbUnchecked
    End If
End Sub

[ichar]

reply, thanks a lot, yes that did give me what i wanted. thanks a lot.

do you think the user would think they can't click the icon while its greyed?

[dee-u]

Usually when a control is greyed it means it is disabled, computer users I think have this general thought...