set value of check box

[nswan]

Hi,

how do i set the value of a check box with out firing the click_event?

Many thanks
Nick

[run_GMoney]

What event would you like to use to change the value?

[techyspecy]

Originally posted by nswan
Hi,

how do i set the value of a check box with out firing the click_event?

Many thanks
Nick

That's how you can stop it ..

Option Explicit
 
Dim m_blnStopFire As Boolean
 
Private Sub Check1_Click()
    If m_blnStopFire Then m_blnStopFire = False: Exit Sub
    MsgBox "I will never fire unless you click on checkbox itself ... "
End Sub
 
Private Sub Command1_Click()
    m_blnStopFire = True
    Check1.Value = vbChecked
End Sub