Ordenar ListView


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Ordenar ListView

Léia

GOIANIA
GO - BRASIL

Postada em 01/10/2004 17:50 hs

Em um form q tenha um listview carregado dinamicamente via sql, preciso fazer uma pesquisa onde o usuario ira digitar num textbox e no evento change deste textbox ele ira selecionar todos os registros que iniciam com as letras ou nome digitados. Como posso fazer para q ele pegue o conteudo textbox procure no listview?
Exemplo:
Digitado: JO
ListView
Joana...
JOrge...
Jose...
Brigadinha

"Quem tem o Filho de Deus tem a vida ! (I Joao5:12)"

Ricardo
não registrado

Postada em 01/10/2004 18:21 hs

Se nao conseguir, me passa seu email q te mando o programinha.
no exemplo eu usei um list, e um text

Private Sub text1_Change()
    Dim A As Integer
    Dim Achou As Boolean

    Achou = False
    ListarTudo

    If Trim$(Text1) = "" Then List1.ListIndex = -1: ListarTudo: Exit Sub

    For A = List1.ListCount - 1 To 0 Step -1
        If LCase$(Left(List1.List(A), Len(Text1))) = LCase$(Trim$(Text1)) Then

            List1.ListIndex = A
            Achou = True
        Else
            List1.RemoveItem A
        End If
    Next

    If Achou = False Then
        List1.ListIndex = -1
        ListarTudo
    End If
End Sub

Sub ListarTudo()
    List1.Clear
    With List1
        .AddItem "Bruno"
        .AddItem "Breno"
        .AddItem "Adriana"
        .AddItem "Gabriel"
        .AddItem "Esequiel"
        .AddItem "Maria"
        .AddItem "Rogério"
    End With
End Sub

Geronimo

JOINVILLE
SC - BRASIL

Postada em 01/10/2004 18:40 hs

Léia veja se esta dica ajuda:

http://www.codex.com.br/colaboracao/VerOK.asp?ID=2043

http://www.codex.com.br/colaboracao/VerOK.asp?ID=1872

http://www.codex.com.br/colaboracao/VerOK.asp?ID=1789

"O pior inimigo que você poderá encontrar será sempre você mesmo."

Léia

GOIANIA
GO - BRASIL

Postada em 02/10/2004 09:25 hs

Ricardo, quando executo essa codificaçao, acusa metodos invalido para para .listindex e .listcount....

"Quem tem o Filho de Deus tem a vida ! (I Joao5:12)"

Página(s): 1/1

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR