[Resolvido]mostrar todos os itens relacionados

Bom dia.

tenho um campo tipo caixa de seleção no form relacionado com vários outros campos de um outro form. Quando eu vou selecionar um dado no campo ele aparece completo com todos os campos relacionado, porem, depois de selecionado aparece apenas o primeiro dado.
tem alguma forma de que nessa caixa apareçam todos os dados?

Olá haxaki,

Creio que sim utilizando a função DPesquisa(Dlookup) .

Sou novato poderia me mostrar um exemplo?

Olá hakaxi,

Código:

Public Function Informacao()
Dim nBusca, nBusca2 As String
Dim sCod As Integer

sCod = Forms!NomedoFormulário!CodNome

'Informa o Campo1 da Tabela1
nBusca = DLookup("Campo1","Tabela1","CodNome = " & sCod)

txtCampo1 = nBusca    'Caixa de texto referente ao Campo1

'Informa o Campo2 da Tabela2
nBusca2 = DLookup("Campo2","Tabela1","CodNome = " & sCod)

txtCampo2 = nBusca    'Caixa de texto referente ao Campo2

.....
End Function

eu tava pensando em uma coisa um pouco diferente, mas isso ficou ate melhor doq eu queria, obrigado

Olá hakaxi,

O fórum todo agradece.

Obs: Visite também o meu site e adquira também o e-book TÉCNICAS ESPECIAIS DE ACCESS VBA !!! No Facebook dêem uma curtida na página também. Vamos apoiar a tecnologia VBA para o ACCESS !!! Se quiser adquiri-lo, envie-me sua solicitação para um dos seguintes emails:

eduardovmachado2007@hotmail.com
eduardomachado@goodguyaccessvba.com.br
sistemasvba@goodguyaccessvba.com.br

Site: www.goodguyaccessvba.com.br
https://www.facebook.com/EduardoMachado

Se quiser aprender mais adquira os meus dois livros DOMINE O ACCESS VBA e TÉCNICAS ESPECIAIS DE ACCESS VBA e você vai aprender isto e muito mais.

Editora Livrorama(DOMINE ...):
www.livrorama.com.br

Editora Ciência Moderna(TÉCNICAS...):
www.lcm.com.br


Um grande abraço.

"O temor do Senhor(respeito pela Palavra de Deus, leitura e obediência) é o princípio do conhecimento" (Prov. 1.7)
Disse Jesus: "E conhecereis a Verdade e a Verdade vos libertará". (Jo 8.32)
Disse Jesus: “Eu sou a luz do mundo; aquele que me segue, não andará em trevas, mas terá a luz da vida.” (Jo. 8.12)