[Resolvido]Implementação de ListBox Integrado

Pessoal
Boa Tarde

Estou com uma duvida que é o seguinte..

Quero colocar em meu formulário um listbox, ordenado por data, e ao lado deste listbox um campo grande de observações, então quando o usuario clicar em uma linha do listbox, irá aparecer a observação que foi previamente cadastrada....como posso fazer isso? voces sabem?

Supondo que esses dois campos constem de uma tabela, insira a list box no seu form e pegando esses dois campos da tabela. Opte por não armazenar o valor dela no momento, mas sim por lembrar para usar mais tarde.
Agora, nas propriedades da listbox, vá até a aba "Formato" e, na linha "Largura das colunas", coloque 1cm;0cm para deixar a primeira coluna, que será a colunda da data, visível, enquanto a segunda, a da observação, ficará oculta.
No evento "Após atualizar" da listbox, coloque o código abaixo:

Me.NomeDaCaixaObservação.value = Me.NomeListBox.Column(1)

Column(1) se refere à segunda coluna, já que os índices começam no 0.

Então terei que criar um subformulário, pois as observações devem ser referentes apenas a um determinado codigo do formulário...de acordo com o que o usuario ira selecionar, correto?

No exemplo que postei, tanto a combo quanto a caixa de texto ficam no formulário, pois imaginei que data e observação fizessem parte da mesma tabela e, portanto, os dois campos ficariam na combo e a observação seria exibida de acordo a data escolhida. Agora, se existem várias observações para uma mesma data, aí o certo é usar um subformulário para exibir as observações.

Viva

Se bem percebi o que o Moderador Criquio escreveu então veja se este exemplo serve:

http://dl.dropbox.com/u/8157744/memoatexto.zip

Como posso apagar as informações do listbox, para que o mesmo receba as novas informações? pois quando estou mudando o registro principal do formulário, os valores do Listbox estao continuando com as informações do registro antigo...

Adriano Boa Tarde

Presumo que a ListBox esteja ligada ao formulário principal pelo ID por exemplo, caso contrário vocêr nã consegue actualizar a listbox. Não estou a ver a aplicação, mas normalmente trabalha-se com um subfomulário ligado pelo ID ou outro campo ao formulário principal. Se insiste na list box (não me parece o melhor método) terá que o fazer uma instrução sql do género:

Dim strSQL As String
strSQL = "Select IdCliente From [sua Tabela] Where Id=" & Me.IdP & ";"
Me.lstClientes.RowSource = strSQL
Me.lstClientes.Requery

Mas, insisto...você pode simular com um subformulário uma listbox. Se puder ajudar mais dê mais info para que eu possa entender, porque a mim parece-me que um subformulário bem desenhado evitava-lhe os problemas todos.

Adriano

Baseado numa das minhas aplicações, criei aqui um exemplo de integração entre um form principal e uma listbox. Esero que isto ajude. Foi feito à pressa mas funciona.

http://dl.dropbox.com/u/8157744/Adriano.zip

Vou verificar a possibilidade de utilizar da maneira que voce me indicou!
De qualquer forma, muito obrigado novamente pelo retorno vieirasoft!

vieira..boa noite!


poderia colocar no link pra mim novamente os dois arquivos?
estou precisando deles e acabei que me esqueci de salvar uma copia na maquina.

Adriano

já não me recordo que arquivos eram mas vou verificar se ainda os tenho senão faço-lhe outro exemplo

Amigo aqui vão os dois exemplos

Bom trabalho

http://dl.dropbox.com/u/8157744/memoatexto.zip

obrigado vieira!!!

Bom trabalho amigo