vba - アクセス2010でサブフォームからデータを削除する

Question

テーブルにデータを保存せずにフォームを終了するボタンをアクセスフォームに作成しようとしています。これは私が書いたものです：

Private Sub Command7_Click()
Me.Undo
Dim myReply

myReply = MsgBox("Are you sure you want to exit without saving?", vbYesNo)
If myReply = vbYes Then
    DoCmd.Close
End If


End Sub

単純なフォームがある場合は正常に機能しますが、フォームにsub form(別のテーブルに関連する) が含まれていてsub form、そのボタンをクリックする前に変更が加えられている場合、レコードは保存されています。

main formと の両方でレコードを削除するにはどうすればよいsub formですか?