Creating a reset/clear button for a form

[Denielle]

Good Afternoon,

I have been trying to figure this out for days. I have a search form in Access 2007 that is unbound with unbound text boxes. The submit button works great, but I am trying to creat a clear button so that the user can clear out their information at once instead of each individual field. My form name is SearchingForm and the text boxes are clientname, operatingstate, product. I have tried the following codes:

Private Sub resetbtn_Click()

Me.Refresh

End Sub

also tried

Private Sub resetbtn_Click()

Me.clientname = ""
Me.operatingstate = ""
Me.product = ""
Me.Refresh

End Sub

Any help would be appreciated. I have not used Access or VB in years, so I am trying to relearn for work. Thanks

[Seth Schrock]

The refresh isn't needed. What happens with your second block of code? Do you get an error message or does it run and just not clear the fields?

[Denielle]

Thank you for the quick response. On either block of code that I try it does nothing, just sits there. I have also tried the = Null instead of the = "". Just to clarify on the code that I listed it was not in there at the same time, that is code that I tried on two different attempts at trying to get it to work

[Luk3r]

So, your textboxes are named: clientname, operatingstate, and product?

[Denielle]

Sorry for the delay. Yes the three text boxes are named the above. (no capitalization and no spaces).

[Luk3r]

Have you tried:

Me.buttonName.Value = ""

[Denielle]

Yes, I have tried that as well and had the same response - nothing happened.

[Seth Schrock]

This makes me think that your code isn't running. Try typing STOP right before your code and then click your Clear button and see if the code stops at that line.

[Denielle]

Ok I just tried that, but I am not sure what it is suppose to do. I get the same result. I have the code open when I am clicking on the clear button and I see nothing happening. Thanks so much for all of the help with this. Here is the code that I have put in

Private Sub resetbtn_Click()
  
Stop

Me.clientname = ""
Me.operatingstate = ""
Me.product = ""

End Sub

[Seth Schrock]

Ok, if the code was actually running, then the code would have stopped with your Stop line highlighted. Go to your Reset button's event list in the properties window. Click in the On Click event line and then click the ellipsis button. If it is attached to your code, it will take you to it. If not, then it will either take you to the code window and create a new event sub or it will ask you what you want to create. If the later, then choose the code option and click OK. That will then create a new event sub and then you can put your code in that one and delete your old one.

[Denielle]

I did that and it took me to my code.

[jimatqsi]

So it sounds like you wrote the code where it should have been, named as it should have been, but did not wire it up to the event. Now that you've done that, I suspect your click will work.

Jim

[Denielle]

You would think that would be the case, but it is still not working. I am not sure what I am doing incorrectly - but for some reason it is still not working.

[zmbd]

OP:2ndBlock:lin e7:Me.Refresh

change to

OP:2ndBlock:lin e7:Me.Repaint

post back results if any.

[Seth Schrock]

Try going to Access Options>Trust Center>Trust Center Settings>Messag e Bar. Make sure that the option to Show the Message Bar in all applications when active content... has been blocked is selected. Then close the database and open it again. See if you get a yellow bar telling you that some content could be harmful and was disabled. If it does, click enable content and then try your button.