I have a cmd button on a form to delete the record:
Private Sub Command121_Click()
On Error GoTo Err_Command121_Click
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
Exit_Command121_Click:
Exit Sub
Err_Command121_Click...