When i created my clear button on my form, it is clearing the db, not just the form

[lillyehrhart]

Private Sub cmdClear_Click()
 
Me.txtSearchSku = Null
Me.txtNMFCCode = Null
Me.txtSearchDesc = Null
 
Me.Repaint
 
End Sub
 

i have this right now, because if i pick anymore of the fields that are in the database, then it takes those records out of it completely. i need for it just clear the form

[NeoPa]

From your posted code I would guess that you're looking to show an empty record on the form. I also guess that the form you're dealing with is a bound form. IE. It has a Record Source and the controls on the form have Control Sources.

What you need to understand is that bound forms are like a window onto the data behind the form, of the recordset that the form is bound to. If it's pointing to a valid record when you set the control values to Null then that will be passed on to the fields of the record itself.

What you are probably looking for is the idea of moving the form (window) on to a separate record. When you move records in a bound form you see the different data in each of those records. To clear the form what you really need to do is to move to the New record. This is a special record found in all recordsets that allow additions.

Does this sound like it's what you're after?

[MikeTheBike]

Hi

Are you trying to cancel all alterations to the form without saving then?

If so, then perhaps Me.Undo (?) or similar, as moving to a new record will save any alterations.

Just a thought.


MTB

[lillyehrhart]

I am trying to use the undo but it is not working.

Private Sub cmdClear_Click()
Me!sku.Undo
Me!description.Undo
Me!Hazardous.Undo
 
 
End Sub

i was reading something about adding the beforeupdate, but i am not really sure how that would work. i am new to vba. please help!!

[lillyehrhart]

when i click on my clear button after adding the above code, it is not doing anything.

[MikeTheBike]

I some time use this

Private Sub cmdCancel_Click()
On Error GoTo Err_cmdCancel_Click
 
    If Me.Dirty Then Me.Undo
 
Exit_cmdCancel_Click:
    Exit Sub
 
Err_cmdCancel_Click:
    MsgBox Err.Description
    Resume Exit_cmdCancel_Click
 
End Sub

If it is not a bound form Me.Dirty will cause an error.

MTB

[lillyehrhart]

Private Sub cmdClear_Click()
On Error GoTo err_cmdClear_click
If Me.Dirty Then Me.Undo
 
Exit_cmdClear_click:
err_cmdClear_click:
msgBox: Err.description
Resume Exit_cmdClear_click
 
end sub

this error says invalid use of property and highlights this and goes to the word description. i am so confused right now

[lillyehrhart]

i figured it out!! thanks so much!!!

[MikeTheBike]

There seem to be two things need correcting ie.

You need an Exit Sub statement after the Exit_cmdClear_click: label otherwise you will never exit the sub!!
You should not have a colon after the msgBox statement

Like this

Private Sub cmdClear_Click()
On Error GoTo err_cmdClear_click
    If Me.Dirty Then Me.Undo
 
Exit_cmdClear_click:
    Exit Sub
 
err_cmdClear_click:
    msgBox Err.description
    Resume Exit_cmdClear_click
 
End Sub

??

MTB

[NeoPa]

Hi Lilly.

Just a quick note to draw your attention to two warning PMs that you've received. I'm guessing you haven't even noticed that they're there which is the reason you haven't done anything about them yet. If so there is a link at the top of every page that says Inbox(#), where # is the number of PMs sent to you that haven't yet been read.

The PMs are telling you that you must use the [CODE] tags whenever you post code on here so that people can read it in a form that makes sense. Once you have sorted out using the PM system feel free to send one to me asking for assistance using the site if you struggle any time. Some areas are easier than others, and all can be complicated if you're not used to using similar systems anywhere.

@Mike.
Well done for catching this and realising what the question was about.

[lillyehrhart]

Yes I just figured it out about the coding part of it. So sorry for the confusion

[NeoPa]

Don't worry about making honest mistakes. You aren't the first and certainly won't be the last.

No-one here will worry about rules broken in ignorance. Do keep an eye out in case you get any further PMs though. They won't necessarily be about rules of course.

[lillyehrhart]

Okay!! Thanks for the advice!!