COMBOBOX E LISTBOX
ola amigos estou tentando fazer um programa de buscas em uma base de dados access
no visual studio 2010. uma aplicação simples com apenas um combobox para escrever a palvra que procuro uma listbox para lista os dados encontrados na base de dados e um button para carregar novamente a proxima busca. eu tenho tudo na list box mas gostaria que os dados só tornassem visiveis após eu chamar uma palavra e clicar no butão de procura especie de uma agenda telefónica . grato
esperando alguma ajuda...
no visual studio 2010. uma aplicação simples com apenas um combobox para escrever a palvra que procuro uma listbox para lista os dados encontrados na base de dados e um button para carregar novamente a proxima busca. eu tenho tudo na list box mas gostaria que os dados só tornassem visiveis após eu chamar uma palavra e clicar no butão de procura especie de uma agenda telefónica . grato
esperando alguma ajuda...
Boa tarde,
Vc fala selecionar no listbox e quando clicar no botão, ele busque de acordo com o que esta selecionado no listbox?
Vc fala selecionar no listbox e quando clicar no botão, ele busque de acordo com o que esta selecionado no listbox?
não. escrever no texte box e quando clicar no botão faz uma procura e lista os dados da base de dados no listbox , tal como no google .
obrigado
obrigado
Ok, amigo veja no anexo se é isso que precisa.
Cara, algo com:
A partir daà você pode executar seu comando de procura no Access (ADODB, OLDEB, etc...)
Eu utilizo o seguinte:
[txt-color=#0000f0]Dim[/txt-color] Procura [txt-color=#0000f0]As String[/txt-color] = Trim(TextBox1.Text)
[txt-color=#0000f0]Dim[/txt-color] strSQL [txt-color=#0000f0]As String[/txt-color] = [txt-color=#e80000][Ô]SELECT nome FROM tbl_Sua_Tabela WHERE nome LIKE [ô]%[Ô][/txt-color] & Procura & [txt-color=#e80000][Ô]%[ô] [Ô][/txt-color]
A partir daà você pode executar seu comando de procura no Access (ADODB, OLDEB, etc...)
Eu utilizo o seguinte:
[txt-color=#0000f0]Dim[/txt-color] C [txt-color=#0000f0]As New[/txt-color] ADODB.Connection, RecSet [txt-color=#0000f0]As[/txt-color] RecordSet
RecSet = C.Execute(strSQL)
[txt-color=#0000f0]While Not[/txt-color] RecSet.EOF
ListBox1.Items.Add(RecSet([txt-color=#e80000][Ô]nome[Ô][/txt-color]).Value.ToString)
RecSet.MoveNext()
[txt-color=#0000f0]End While[/txt-color]
RecSet.Close()
C.Close()
Tópico encerrado , respostas não são mais permitidas