Hi all,

In my form i have say 10-15 check boxes, and 5 text boxes,

To clear the text boxes i use the floowing code:

Private Sub ClearTextBoxes()
Dim ctl As Control

' Clear all the TextBoxes on the form.
For Each ctl In Controls
If TypeOf ctl Is TextBox Then ctl.Text = ""
Next ctl
End Sub

I am stuck on how to go about clearing al the checkboxes once the user presses save