Clear text boxes

[jpl458]

Is there a way to clear all the dat entry text boxes on a form without having to address each one?

 

[plog]

No, there is no Me.ClearAllTextBoxes(), but you can make one.

You can loop through all the controls of a form with by using Me. Controls, then you can use the .ControlType to see if its a acTextBox and if so you can then clear it.

 

[Ranman256]

sub ClearAllTextBoxes()
dim ctl as control
for each ctl in controls
   if Typename(ctl) = "TextBox" then ctl.value = ""
next
end sub

 

[jpl458]

sub ClearAllTextBoxes()
dim ctl as control
for each ctl in controls
   if Typename(ctl) = "TextBox" then ctl.value = ""
next
end sub

How about Me.Requery. That seems to work.

 

[theDBguy]

How about Me.Requery. That seems to work.

Is your form bound or unbound?

 

[jpl458]

Is your form bound or unbound?

Bound

 

[theDBguy]

Bound

Is the Data Entry property set to Yes?

 

[jpl458]

Data Entry set to Yes

 

[theDBguy]

Data Entry set to Yes

You could try something like this too.

DoCmd.GoToRecord , , acNewRec

Hope that helps...