Here is some code that you can place in a click event. You will need to adjust the text in red to match the form's control name, table name, and field name. This will delete a single record in the table that is associated with the ID field currently displayed in the form
Code:
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("tblName", dbOpenDynaset)
If rs.EOF Then
rs.Close
Set rs = Nothing
Exit Sub
End If
rs.FindFirst "[IDFieldName] = " & Me.IDControlName.Value
If rs.NoMatch Then
MsgBox "Could Not Find Record to delete."
rs.Close
Set rs = Nothing
Exit Sub
End If
rs.Delete
MsgBox "The record has been deleted."
rs.Close
Set rs = Nothing