Here is an image of the 2 forms and code

I don't see the issue with your code either, but maybe try this?  Be SURE to BACKUP before running this.

    If MsgBox("There are no cylinders entered. Do you wish to Close and delete this record?", _
              vbQuestion + vbYesNo, "Confirm Delete") = vbYes Then
        
        ' Delete current record safely using DAO
        With Me.RecordsetClone
            .Bookmark = Me.Bookmark
            .Delete
        End With
        
        DoCmd.Close acForm, Me.Name
    End If
Else
    If Me.Dirty Then Me.Dirty = False   ' Save changes
    DoCmd.Close acForm, Me.Name

Thanks, Will give it a try and let you know

Kim What is the error?

Not knowing the error, the three things I would look at in that form: 1) Did deletions somehow get disabled in that form, 2) did the form somehow get opened in "Read Only" mode, 3) is the form's recordsource editable

Donald, i did check all of these. The problem was when I hit the "Close" button the code should run to verify that the subform is empty and if it was to ask the user keep going or delete the record. That is what is supposed to happen. However when i hit the close button the code directs me to the highlighted line. The 2 forms are for comparison the forms are almost identical one works, other one does not. all controls are exactly the same on both forms. I tried the code from Sandra..sorry that did not work. still scratching my head on this problem

So what is the exact error message that pips up.before it sends tou to that code. If it isn't showing an error message, you may need to comment out the SetWarnungs false line and try it so you get the error message.

Once we have that message it may help more.

When DoCmd.RunCommand acCmdDeleteRecord returns a run-time error, that means the record can't be deleted due to the absence of any record, the correct form and record not in focus, the record is still being edited (i.e. dirty), or perhaps some other causes.  

Using RunCommand is like clicking the corresponding button on the Access ribbon bar.  The Delete Record button is a red X on the ribbon.  Running DoCmd.RunCommand acCmdDeleteRecord is like clicking that red X. When no record can be deleted, that button is greyed out, and running DoCmd.RunCommand acCmdDeleteRecord will cause an error.