Помогите с удалением записей! Суть такая есть форма, и в ней 2 подчинительные формы. Все записи связанны. Как сделать, что бы записи из 2 подчинительных форм сразу удалялись. Я допер только как из одной формы удалить, т.е. из одной удаляет, а из второй нет.
Вот листинг который я для одной придумал. Вторая подчинительная форма Мать, удаление по полю Код

Private Sub Кнопка48_Click()
On Error Resume Next
Dim SQL As String 'Строка запроса на удаление двигателей
Dim Response As String
   
If [отец].Form.CurrentRecord > 0 Then
Response = MsgBox("Выдействительно хотите удалить запись?", vbYesNo)
If Response = vbYes Then
           
SQL = "delete from [отец] where [отец].[Код] = " & [отец].Form.[Код]

          DoCmd.RunSQL SQL
            Form.Refresh
           
        End If
    End If
         
End Sub