If it is a bound form, go to a new record. If it is unbound, then something
like this should work:
Dim ctl as Control
For Each ctl in Me.Controls
if ctl.ControlType = acTextBox Then
ctl = ""
If you need to clear anything other than text boxes, you can modify this to