[Resolvido] Inserir Valor com Função DLookup

Bom Dia

Tenho um pouco de dificuldade de entender e montar as função DLookup.
minha dificuldade e a seguinte tenho um form "Frm_Vendas", gostaria que quando eu atualiza-se o campo cliente  ele busca-se  através do campo IdCliente do form Frm_Vendas,  e fosse na tabela Tb_clientes e busca-se o valor do campo VencCad no formato data e inseri-se no campo DataVenc tambem no formato data do form frm_Vendas.

Boa tarde !

Poste sua base de dados com as partes envolvidas para podermos analisar.

Boa Tarde

vou postar um exemplo mas a função e a msm
no Frm_Venda existe um caixa de combinação onde consta o nome do cliente, e um campo com o id do cliente e existe um botão "Bt" com a
função: Me.dataVenc.Value = Me.nome.Column(2)
no projeto queria focar na função DLookup no botão"BtBuscar" baseado no campo id do cliente.

me.camporesultado = dlookup ("campoprocurado", "tblprocurada" , "idcliente = " & me.combox.column(x)

obs: x -> número da coluna, lembrando que começa sempre do 0

Altere para os nomes dos teus campos e teste.

thiagonsilvaa

coloquei  a função no botão e deu erro, coloquei exemplo de novo e gostaria de não usar a  combox e só usara o idcliente como busca

Veja se o anexo desta mensagem ajuda a entender a função
https://www.maximoaccess.com/t29667-resolvidofuncao-dlookup#249629

Bom dia
Deu certo!
Obrigado


Me.dataVenc = DLookup("datacad", "Tb_CLI", "Idnome = " & IdCliente)

O fórum agradece o retorno. Sucesso.

Bom dia !

Esqueci de fechar o parêntese da função

me.camporesultado = dlookup ("campoprocurado", "tblprocurada" , "idcliente = " & me.combox.column(x))

Por isso o erro, peço desculpas aos meus amigos.

Sucesso !

Valew thiagonsilvaa