What's wrong with the following code:
Private Sub cmdDelete_Click()
Response = MsgBox("Do you want to DELETE the current record.", vbYesNo + vbExclamation + vbDefaultButton2, "Warning")
If Responce = vbYes Then
When the 'Yes' button is clicked nothing happens, but without the message box the 'frmFormName.datacontrol.Recordset.Delete' works OK. So its not detecting that the Yes button has been clicked.