[Resolvido]cod para buscar id na tabela e exibir num campo não acoplado

Boa tarde ! a todos ,!Alguém sabe um cod vb ,para ser inserido num campo não acoplado, de um form ,para me mostrar o dia em que um cliente fez sua ultima visita baseado na tabela!
Sei fazer isso numa consulta ,mas preciso que esse resultado(data) apareça no form ao digitar o nome do cliente !
Seria assim, ao digitar um nome de um cliente numa combobox de um form, esse campo não acoplado me mostre a data em que esse cliente fez sua ultima visita!obrigado
Ah access 2007 em XP!

Olá. Você pode usar o dlookup, que serve para buscar dados em uma determinada tabela usando critérios de busca.

Vejamos este exemplo:

'Declaração da variavel de busca na tabela
Dim varbuscar As Variant

'Código de busca usando o dlookup
'Os nomes usados no decorrer do código deve ser adaptado ao seu uso!
varbuscar = DLookup(nomedocampo, nomedatabela, campotabela = Forms!nomeform!ComboBox.Value)

'Exibe na sua ComboBox a variavel que esta armazenada os dados desejados
ComboBox = varbuscar

Espero ter ajudado!

Misaelsp ,deixe -me ver !!!Poderia me explicar como aplicar isso no frm ,?
obs: o campo referidonão acoplado só precisa ler a tabela e me mostrar a data em que o cliente fez sua ultima visita!

Alguem poderia me dizer como fazer isso ?

= DLast ("SeuCampo";"SuaTabela";"SuaID = " & Me.CaixaTextoIDCliente & "")

Dentro da caixa texto.


Cumprimentos.

Ë uma data... não havia percebido.. utilize então o DMax

= DMax ("SeuCampoData";"SuaTabela";"SuaIDClienteNaTabela = " & Me.CaixaTextoIDCliente & "")


Cumprimentos.

Obrigado Piloto ! Vou fazer!No caso o form cliente ,não tem campo data e nem a tabela cliente tem campo data?

= DMax ("SeuCampoData";"SuaTabela";"SuaIDClienteNaTabela = " & Me.CaixaTextoIDCliente & "")

Não tenho esse artefato!
Eu suponho que o campo não acoplado deve ser formato data com o nome de Texto36!logo
= DMax ("Texto36";"Cliente";"Códigocliente = " & Me.cbocleinte & ""), mas ai ao digitar um nome na combobox ,o campo não acoplado fica como #Nome?

Dlookup, Dfirst, Dlast, Dmax.. pesquisa em Tabela!!! portanto não é o nome da caixa texto.. e sim o nome do campo na tabela

DMax ("SeuCampoDataNaTabela";"SuaTabela";"SuaIDClienteNaTabela = " & Me.SuaCombo.Column(x) & "")

onde x = número da coluna com a ID do cliente, lembrando que a primeira coluna é a de número 0


Cumprimentos.

Piloto esse campo data baseado numa consulta não seria o mais correto!numa consulta :
SELECT TOP 1 tblVenda.DataServico, tblVenda.Nome
FROM tblVenda
WHERE (((tblVenda.Nome)=[DIGITE O NOME]))
ORDER BY tblVenda.DataServico DESC;

fiz assim criei uma consulta com criterio nome
ai ela me exibe a ultima data apos digitar qq nome ,agora eu só precisava que esse campo data no frm se baseasse na consulta ,mas pelo nome que esta na combobox do frm está correto meu raciocínio?

= Dlookup("CampoDaConsulta";"NomeDaConsulta")


Cumprimentos.

Mas o Dmax faz isso...

Faça assim me envia o bd citando os objetos envolvidos.


Cumprimentos.

Consegui aqui ,piloto!muito obrigado ,o erro era !o negrito,tirei o Me. ai rolrou!
= DMax ("SeuCampoData";"SuaTabela";"SuaIDClienteNaTabela = " & [Me].[CaixaTextoIDCliente] & "")

=DMáx("DataServico";"tblVenda";"códigoCliente = " & [CódigoCliente] & "")]
Desculpe amolação!

 Muito Obrigado!

O Fórum agradece o retorno.