Delete button in Form

[mrrayj60]

The delete button in my form was installed using the command button wizard.
When I delete a record it deletes the record but leaves a blank record and then I have to go and delete the blank record too. Is there a way to delete a record and not leave a blank? Thanks in advance - Ray :banghead:
Event - On Click Code

Private Sub Command130_Click()
On Error GoTo Err_Command130_Click
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

Exit_Command130_Click:
Exit Sub

Err_Command130_Click:
MsgBox Err.description
Resume Exit_Command130_Click

End Sub

 

[Uncle Gizmo]

Do you mean it shows "Deleted" where the record was?

 

[mrrayj60]

I get the confirmation request, Do you want to delete 1 record? click yes and the record is deleted but it always leaves a totally empty blank record that I have to delete...its always done this so I am finally tired of it looking for the answer - Thanks Ray

 

[Galaxiom]

Private Sub Command130_Click()
On Error GoTo Err_Command130_Click
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

Exit_Command130_Click:
Exit Sub

Err_Command130_Click:
MsgBox Err.description
Resume Exit_Command130_Click

End Sub

DoMenuItem has been deprecated for 20 years!
Use DoCmd.RunCommand acCmdDeleteRecord

 

[mrrayj60]

New method installed but still leaves a blank record. Here are 4 snips from my form and table - as the last photo shows its a new record automatically numbered.
Thanks for all the help - Ray

 

[AccessBlaster]

A requery might solve this issue.