how do I check a ckeck box and have a 5 appear in text box

[Charles Stoddar]

I have a check Box and a Text Box. How do I check a ckeck box and have a 5 appear in text box

[Mariostg]

Set an OnClick Event to your check box:

Private Sub Check_MyCheckBox_Click()
    If Me.Check_MyCheckBox = -1 Then
        Me.Text_Results = 5
    Else
        Me.Text_Results = ""
    End If
End Sub

Set Check_MyCheckBo x and Text_Results according to your own checkbox and text box names.