Função Dlookup (resolvido)

[robsabin]

Olá tenho o seguinte poblema:

Dim vcnpj as Variant

vcnpj = DLookup("[cnpj]", "tab_cadastro", "[destinatario] = Forms![Digigraph_Ordem de Serviço]!CLIENTE")

If vcnpj = Null Then

Forms![Digigraph_Ordem de Serviço]![CNPJ] = "Sem CNPJ"

End If

Gostaria de saber porque quando a campo na tabela não tem CNPJ o formulario não aparece a expressão "Sem CNPJ"

Desde já agradeço.

[Fredox]

Tente usar no loguar do IF oseguinte

if isnull(vcnpj) then

...

end if

te mais!

[MrMALJ]

Dim vcnpj as Variant

vcnpj = DLookup("[cnpj]", "tab_cadastro", "[destinatario] ="& Forms![Digigraph_Ordem de Serviço]!CLIENTE)

If vcnpj = Null Then

Forms![Digigraph_Ordem de Serviço]![CNPJ] = "Sem CNPJ"

End If

Bom como você pode ver só o que tinha de errado era as aspas no critério... se der certo confirme alias se puder sempre que suas duvidas solucionados confirme ok!

[robsabin]

Olá problema resolvido

Muito obrigado