[Resolvido]caixa de listagem

Boa tarde,

meu problema é o seguinte:

tenho uma caixa de listagem na qual eu pesquiso atraves de uma textbox só que quando eu clico em cima do registro ele me abre um form em branco sem os dados do registro selecionado.

(não estou conseguindo postar o banco de dados aqui, porem sao poucas linhas de codigo entao segue as imagens)

Boa tarde, se for caixa de listagem tente no evento Ao clicar duas vezes:

Código:

Dim strCriterio
strCriterio = "[CódigoPrimário]=" me.lstpesquisa.Column(0) '0 é a primeira coluna
DoCmd.OpenForm "NomeDoFormulário", , , strCriterio

Bom dia Fernando,
obrigado pelo retorno, porem continua da mesma maneira.
Segue imagens do que esta acontecendo e os codigos, pois realmente nao estou conseguindo postar o banco de dados : /

Bom dia!

Perdão, esqueci de concatenar o comando correto é:

Código:

Dim strCriterio
strCriterio = "[CódigoPrimário]=" & Me.lstpesquisa.Column(0)
DoCmd.OpenForm "NomeDoFormulário", , , strCriterio

De qualquer forma segue um simples exemplo para melhor entendimento.

Aguardamos...

https://mega.nz/#!Xlk1HTZT!VYrc5bCCV1D3YjOXw8m5evN1Q0hi3eTTn8PP7ZWzMnE

Fernando muito obrigado pela resposta e pelo exemplo postado, com ele consegui resolver meu problema do formulário.

Porém ainda me resta uma dúvida.

Existe um campo em minha tabela (Descrição - Tipo inteiro longo) que nao aparece na lista.

Como faço para mostrar este campo?

Boa tarde,

Verifique nas propriedades da listbox na aba Formato ou Todas, o número de colunas da list box

e logo abaixo a largura dos campos, pode observar isso em meu exemplo e tirar base para

seu banco ok.

Aguardamos..

Bom dia Fernando,

muito obrigado pela ajuda, deu tudo certo.

Segue abaixo o link do arquivo para download caso alguem precise.

https://mega.nz/#!FL5Q2TIb!o25znVfrfK_mWHNWbaTIdNxVyBA5CmfFx9cor0mooyI

Bom dia Glauco;

Que bom que deu certo, precisando estamos por ai..

Agradecemos o retorno!