Update Query

[Roger Bell]

I have a button on a form that resets fields to zero when clicked with an
Onclick event procedure as follows:
Private Sub RESET_ENTRIES_Click()
On Error GoTo Err_RESET_ENTRIES_Click
DoCmd.RunCommand acCmdSaveRecord

Dim stDocName As String

stDocName = "RESET CALCULATOR"
DoCmd.OpenQuery stDocName, acNormal, acEdit

Exit_RESET_ENTRIES_Click:
Exit Sub

Err_RESET_ENTRIES_Click:
MsgBox Err.Description
Resume Exit_RESET_ENTRIES_Click

End Sub

The problem is that when this button is clicked the amounts to not reset to
zero until I click in one of the fields or Exit and re-enter. Is there
something I am missing or a way to fix this?

Thanks for any help

 

[Dennis]

Try putting
Me.Recalc
after the DoCmd.OpenQuery stDocName, acNormal, acEdit