[AccessD] Cancel Produces Error

Dear List:
 
The following code for deleting a record, generated by the wiz errors on the
second statement if the user clicks cancel to the warning message.
 
    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

Is there a right way around this?  Placing On Error Resume Next between the
statements would probably work but doesn't seem right.
 
MTIA
 
Rocky