CONSULTA DBLIST

PROPAR 29/03/2004 10:50:23
#17442
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
USUARIO.EXCLUIDOS 03/04/2004 18:56:00
#18738 Resposta escolhida
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 encerrado , respostas não são mais permitidas
Voltar