[Resolvido]Dlookup retornar varios campos!

Tenho uma tabela com 7 campos:

Nome...............João
Profissão..........Pedreiro
Endereço...........Rua das camélias
Cidade.............Vilhena
Internação.........em branco
Doença.............em branco
Medicação..........em branco


Que era usar a função Dlookup para quando em um form em uma combo eu selecionar o nome joão ele retornar:
os campos: Nome, Profissão, Endereço, cidade e os demais: Internação, Doença e medicação retornarem em branco ou nulo para serem preenchidos, é uma espécie de cadastro.

Se alguem ainda estiver acordado e disposto eu agradeço a ajuda...

Ja que é em uma combo, nao precisa do Dlookup

Carregue a origem da combo com os campos da tabela
CampoID, Campo1, Campo2, Campo3, Campo 4 etc...

E no evento após atualizar da combo:

Me.SeuCampo = Me.SuaCombo.Column(0) ** lembrando que (0) é a primeira coluna
Me.SeuCampo1 = Me.SuaCombo.Column(1)

e por ai vai.

Cumprimentos.

Harysohn acho que você não entendeu! A questão da combo, eu sei como fazer, eu queria no Dlookup, exemplo:

Eu filtrasse um nome de uma pessoa, de uma tabela e só me retornasse o nome, endereço e cidade, os demais campos viam em nulo no form, para serem preenchidos, é tipo nas lojas, fazem o cadastro do cliente e fecha o form cadastro.
Ai o cliente volta la amanhã para comprar ai o vendedor, abre o form de venda filtra o nome com alguns dados do cliente eos demais campos sáo nulos para serem preenchidos, é mais ou menos isso que quero.

Grato.

Olá Lupércio

Se o seu formulário trabalha desvinculado da tabela de cadastro, a opção correta é a do Hary.

Se trabalha vinculado, use o FILTER do forumulário para buscar os dados.

me.filter = "idCliente =" & me!SuaCombo.column(0)
me.filterOn = true

O Dlookup como vc pretende é o pior dos casos pois cada vez que vc usa, é uma visita a tabela. Imagina então se tiver que popular 10 campos. Se o projeto for usado em rede, use com cautela para não prejudicar o desempenho.

me!NomeCliente = Dlookup("NomeCliente","NomeDaTabela","IdCliente =" & me!SuaCombo.column(0))

Sucesso!

Ta certo Avelino, estive pensando aqui tambem, acho que vou tentar de outra maneira, um abraço e obrigado pelas dicas.

Resolvido por aqui amigos e obrigado!

O Fórum agradece o retorno.