[Resolvido]Erro 3075 x Dlookup

Boa tarde

Tenho uma tabela onde tenho os campos:
pacNome - Nome do Paciente; tipo texto
pacData - Data de Nascimento do Paciente; tipo data abreviada
pacMae - Nome da mãe do paciente; tipo texto

Ao gravar, estou usando o dlookup para verificar tais campos antes da inclusão para evitar redundância de cadastros. Estou usando o código a seguir:

Código:


If DLookup("*", "tb_Pacientes", "pacNome = """ & Me!tx1 & """" & "pacData = """ & Me!tx2 & """" & "pacMae = """ & Me!tx3 & """") = 1 Then
    MsgBox "Paciente já cadastrado...", , "Aviso"
    Me!tx1.SetFocus
    Exit Sub
End If


Ao clicar o botão gravar retorna o erro Erro em tempo de execução 3075.

Alguém tem alguma dica de onde estou errando.

Att. Vinicius

Boa tarde,
If DCount("*", "tb_Pacientes", "pacNome = '" & Me!tx1 & "' and pacData =#" & Me!tx2 & "# and pacMae = '" & Me!tx3 & "'") >0 Then

Obrigado!