[Resolvido]Apagar dados de uma Tabela com o botão excluir em outro formulario

Prezados, Boa tarde!

Tenho um formulário que exclui dados de uma tabela vinculada a ele, mas preciso apagar dados de outra tabela também com o mesmo comando do botão excluir, tentei desta CurrentDb.Execute "DELETE FROM tblEntrada Where Cod= &Me.txtCódigo" ou seja o valor que estará no txt e que será apagado mas não obtive exito.

Alguém pode me auxiliar.

Grato

use este modelo

Código:

Private Sub cmd_Excluir_Click()

On Error Resume Next
DoCmd.SetWarnings False

  If MsgBox("Deseja Realmente excluir este Registro ?", vbYesNo + vbCritical + vbDefaultButton1, "Aviso") = vbYes Then

        Dim txtreg As Double
        txtreg = Me.txtCódigo
        CurrentDb.Execute "DELETE * FROM tblEntrada WHERE cod=" & txtreg & ""
        Me.Requery
        'Me.Seusubform.Requery

   End If
  
DoCmd.SetWarnings True

End Sub

Meu Brother, Vlw funfou certinho.

Obrigado pela ajuda e rapidez em atender, realmente vcs são comprometidos em ajudar os outros.

Agradeço o retorno, boa sorte.

sds.