COMO USAR O EVENTO CLICK NO LISTBOX PARA PREENCHER

EDLIMA 27/02/2012 15:05:32
#395790
Boa tarde pessoal, eu gostaria de saber se alguem sabe me dizer como faço para que uma listbox que contem dados vindos de um BD, quando clicado possa carregar um grupo de textbox de um formulario. Eu penso que vou precisar do id do campo e atraves dele puxar os dados mais com posso gerar o evento click para isso na listbox?

Se alguem pode ajudar agradeço.
PHOENIX209E 27/02/2012 23:41:17
#395845
vc quer puxar as informaçoes do registro,isso?
PEGUDO 28/02/2012 07:42:47
#395851
Resposta escolhida
Você pode fazer uma pesquisa pelo conteúdo do ListBox:
[txt-color=#0000f0]Private Sub[/txt-color] ListBox1_SelectedIndexChanged(sender [txt-color=#0000f0]As[/txt-color] System.Object, e [txt-color=#0000f0]As[/txt-color] System.EventArgs) [txt-color=#0000f0]Handles[/txt-color] ListBox1.SelectedIndexChanged
[txt-color=#0000f0]Dim[/txt-color] Parametro [txt-color=#0000f0]As String[/txt-color] = ListBox1.SelectedItem
[txt-color=#0000f0]Dim[/txt-color] strSQL [txt-color=#0000f0]As String[/txt-color] = [txt-color=#e80000][Ô]SELECT * FROM tabela WHERE nome LIKE [ô][Ô][/txt-color] & Parametro & [txt-color=#e80000][Ô]%[ô][Ô][/txt-color]
[txt-color=#0000f0]Dim[/txt-color] C [txt-color=#0000f0]As New[/txt-color] ADODB.Connection, RecSet [txt-color=#0000f0]As[/txt-color] ADODB.RecordSet

[txt-color=#007100][ô]Já fiz conexão com o BD[/txt-color]

RecSet = C.Execute(strSQL)

TextBox1.Text = RecSet([txt-color=#e80000][Ô]nome[Ô][/txt-color]).Value.ToString
TextBox2.Text = RecSet([txt-color=#e80000][Ô]endereco[Ô][/txt-color]).Value.ToString
TextBox3.Text = RecSet([txt-color=#e80000][Ô]bairro[Ô][/txt-color]).Value.ToString
TextBox4.Text = RecSet([txt-color=#e80000][Ô]Cidade[Ô][/txt-color]).Value.ToString

RecSet.Close()
C.Close()
[txt-color=#0000f0]End Sub[/txt-color]

Como vc pode ver, este é um exemplo simples e didático.
Espero poder ter ajudado
Tópico encerrado , respostas não são mais permitidas