Access form reset

[Askie]

Hi I am using Access 2007.
Essentially what I am after is how I can get an input form to clear itself upon opening it then, after adding a new record again clearing itself down.

I am relatively new to this so any help will be most appreciated

 

[boblarson]

If it is a bound form, just move to a new record.

if you are using unbound controls then you can use this function here:
http://www.btabdevelopment.com/ts/default.aspx?PageId=36
Just paste it into a new module (standard module, not form, report, or class module) and then call it when you want:

ClearAll "FormNameHere"

 

[Askie]

Bob
Sorry but how do I establish whether the form is bound or otherwise?

 

[boblarson]

Bob
Sorry but how do I establish whether the form is bound or otherwise?

If your form has a table, query, or SELECT statement in its Record Source property (found in the properties dialog when you open the form in design view and then go to the DATA tab).

 

[Askie]

If your form has a table, query, or SELECT statement in its Record Source property (found in the properties dialog when you open the form in design view and then go to the DATA tab).

Thanks Bob. The form is bound. So therefore the original solution of navigating to new record is the one. Since I would like this to be controlled by a button "Add Record" how do I navigate to new record programatically i.e. Code
Such code would need to give me clear form when I first open it and then again when I finish adding record

 

[boblarson]

The code to go to a new record can be

If Not Me.NewRecord
   DoCmd.RunCommand acCmdRecordsGoToNew
End If

That would go in the form's On Load event and in the click event of the button.

But you can create a new function in a standard module, like this:

Function NewRec(frm As Form)
   If Not frm.NewRecord Then
      frm.Recordset.AddNew
   End If
End Function

And then you can call that function in both events.

If you put it into the event property of that event you can use

=AddRec

or if you put it in the VBA Window of the event you can just use

AddRec

 

[Askie]

Bob
I've tried the function but cannot get it to work using either of the options (AddRec, =AddRec)
Also noticed that the function is ...NewRec.... so I changed to NewRec instead of AddRec, still no joy