Tópico anterior Próximo tópico Novo tópico
VB / VBA
#17442 - 29/03/2004 10:50:23 | ||||
![]() PROPAR SAO PAULO Cadast. em:Março/2004 ![]() |
EU TENHO UM DBLIST COMO NOMES DE TODOS CLIENTES E GOSTARIA DE CRIAR UMA CONSULTA , ASSIM EU COLOCARIA UM TEXTBOX E QUANDO O USUARIO COMEÇAR A DIGITAR O NOME ELE VAI MOSTRADO OS NOMES ATé CHEGAR NO CERTO..
EXEMPLO : DIGINTANDO : ALEXAN (CONFORME VC VAI DIGITANDO ELE VAI CHECADO NO CLIENTE ) ALEXANDRA CICERA - FOCUS AQUI ALEXANDRE APARECIDO DE ALMEIDA ALESSANDRO AFONSO alexandre |
|||
Resposta escolhida #18738 - 03/04/2004 18:56:00 | ||||
![]() USUARIO.EXCLUIDOS Cadast. em: |
Caro amigo
com o DbList eu não consegui pq não encontri uma forma de ler item por item para verificar se é igual ao digitado pois num tem uma opção q procure por index MASS pelo o LIST eu fiz o código Dim i For i = 0 To List1.ListCount - 1 If Left(List1.List(i), Len(Text1.Text)) = Text1 Then List1.Selected(i) = True Exit Sub 'List1.Selected(I) = True Else List1.Selected(i) = False End If Next i Aí então é soh vc carregar os Dados da sua Tabela no List usando o ADO Espero ter ajudado |
|||
Tópico anterior Próximo tópico Novo tópico