[Resolvido]List box com campo Memo.

Ola pessoal, bom dia.

Tentei procurar no forum mas nao escontrei.

Como faço para que minha listbox mostre toda a informação de um campo memorando?.

Desde ja agradeço.
David

Poderia ser mais específico por gentileza? Você quer que sejam exibidas as linhas de um memo nas linhas de uma list? Ou as linhas de um memo nas colunas de uma list? Ou seria ainda palavras de um memo nas linhas ou colunas de uma list?
Quanto mais detalhes fornecer, mais eficazes serão as dicas.

Ola criquio,

entao seria as linhas de um memo nas colunas de uma list.

Nesta list tenho o codigo do cliente, nome do cliente e um motivo de bloqueio que seria a Memo.

Obrigado

Então você quer jogar esse motivo da memo na última coluna da listbox, correto? Talvez fosse mais eficaz essa memo ser gravada diretamente na tabela e com um requery você atualiza a listbox.

hunnnn...e como posso fazer isto?? desde que tenho a memo na tabelas de cadastros de clientes??

E assim, voçe tinha me ajudado a fazer com que nas vendas, quando selecionava um cliente e ele estivesse bloqueado, me desse um aviso...ate ai blz. O aviso seiria ims Form. (Este cliente esta bloequeado gostaria de consultar o cliente?) ai se colo sim ele abre esta list com os campos que te falei e o ultomo seria esta Memo com os motivos do bloequeio.

Obrigado

Então já está tudo gravado na tabela? Ou seja, você quer apenas consultar o que já tem gravado?

isto mesmo, ate fiz a consulta mas os dados do campo memo, nao aparece inteiro na list, queria que mostrasse todos os dados que contem neste campo.

SELECT cad_cliente.[Código:], cad_cliente.[Nome:], cad_cliente.MotivoBloqueio, cad_cliente.RefBloqueio FROM cad_cliente WHERE (((cad_cliente.[Nome:]) Like [Forms]![For_ListaCliente_Bloq].[txt_nome] & "*"));

Obrigado

Então me parece que você quer é o contrário do que eu havia entendido. Consultas tem limite de caracteres menor do que uma memo. Tente algo assim, buscando diretamente na tabela:

Me.SeuCampoMemo = DLookup("MotivoBloqueio", "NomeDaTabela", "Código=" & Me!Código)

ou se o código estiver na listbox, geralmente na coluna 0:

Me.SeuCampoMemo = DLookup("MotivoBloqueio", "NomeDaTabela", "Código=" & Me!SuaList.Column(0))

Caro criquio, esta dando. Erro em tempo de execução '3075' erro de sintaxe(operador faltando) na expressao de consulta 'Codigo='.

estou colocando este codigo direto do form que contem a list box.

Se o campo código for tipo texto, precisará adicionar aspas simples:

Me.SeuCampoMemo = DLookup("MotivoBloqueio", "NomeDaTabela", "Código='" & Me!Código & "'")

entao o erro ocorre neste codigo

Me.MotivoBloqueio = DLookup("MotivoBloqueio", "Cad_Cliente", "Código=" & Me!Lista0.Column(0))

Deixa eu tirar mais uma duvida...
O form que estou utilizando este codigo e o form que contem apenas a lisl e uma caixa de testo que pesquiso a list.

teria que criar o campo MotivoBloqueio dentro desta form??

Fica difícil falar assim com certeza sem conhecer a estrutura. O que a gente faz é dar pistas genéricas, uma vez que não conhecemos como o aplicativo foi ou está sendo montado. Se puder disponibilizar uma cópia seguindo a dica da minha assinatura abaixo ↓ pode ajudar.

entao resolvi da segunte maneira, nao sei se pode dar algum problema.

Na list no evento ao clicar coloquei assim:

Me.MotivoBloqueio.Value = Me.Lista0.Column(2)
Me.MotivoBloqueio.Requery

assim mostra todos os dados que preciso que esta na Memo. O que voçe acha??

Se está a funcionar, então está resolvido. O caminho é por aí mesmo. Como eu havia dito, eu não sabia em que coluna estava o valor a ser filtrado.

muito obrigado mesmoo pelas dicas amigo criquio...mais uma vez voçe me ensinou!!

aos poucos vou aprendendo a mexer e desenvolver.

abraços

É isso aí amigo. Eu tambem estou aprendendo. E muito do que aprendi foi tentando achar respostas para dúvidas aqui postadas.