PESQUISAR E EXIBIR NO LISTVIEW

EMANUEL 08/04/2011 14:37:08
#370858
Pessoal, Boa tarde!

Eu tenho um listview onde eu exibo varios clientes pelo perido de cadastramento,

dai quero digitar em um TEXT o codigo de um cliente, e que me mostre em vermelho no listview o cliente informado. apenas destacar ou selecionar o cliente que corresponde ao codigo informado.

desde ja agradeço,

Emanuel
TECLA 08/04/2011 22:25:20
#370896
Utilize o método FindItem do ListView.

Exemplo:
Dim item As ListItem
Set item = ListView1.FindItem([Ô]1001[Ô])
If item Is Nothing Then MsgBox [Ô]Não achou[Ô] Else MsgBox [Ô]Achou[Ô]

OBS.: Digitei diretamente aqui e não testei no VB6.
Teste e verifique se há algum termo digitado incorretamente.
EMANUEL 09/04/2011 22:22:38
#370950
Caro Tecla,

Seria possivel voce me passar um exemplo?

Desde ja agradeco.

Abraços

Emanuel
TECLA 09/04/2011 22:57:26
#370955
Resposta escolhida
Citação:

:
Caro Tecla,

Seria possivel voce me passar um exemplo?

Desde ja agradeco.

Abraços

Emanuel


Se não percebeu, postei um exemplo com um trecho de código no post acima.
Teste a rotina e veja se funciona.
EMANUEL 10/04/2011 11:11:58
#370985
Opa tecla,

Obrigado cara. realmente funciona seu codigo.

So mais um detalhe se possivel.

daria pra selecionar no ListView1 o tem encontrado?
Qual seria o comando?

obrigado
Emanuel
JONATHANSTECKER 10/04/2011 14:16:53
#370994
Tente assim.:
Dim item As ListItem
Set item = ListView1.FindItem([Ô]1001[Ô])
If item Is Nothing Then MsgBox [Ô]Não achou[Ô] Else MsgBox [Ô]Achou[Ô]

If Not item Is Nothing Then
itmFound.Selected = True
itmFound.EnsureVisible
End If
EMANUEL 10/04/2011 15:59:10
#371001

Amigo JONATHANSTECKER,

Seu codigo nao funcionou?

Podes reve-lo?

obrigado.
Emanuel
JONATHANSTECKER 10/04/2011 16:42:17
#371002
Selecionei a variável errada. Teste assim.:
Dim item As ListItem
Set item = ListView1.FindItem([Ô]1001[Ô])

If Not item Is Nothing Then
item.Selected = True
item.EnsureVisible
End If
EMANUEL 10/04/2011 22:22:34
#371012
Caro JONATHANSTECKER


mesmo assim nao funciona seu codigo.

Emanuel
EMANUEL 10/04/2011 23:09:44
#371014
Caro JONATHANSTECKER

Agora sim.. funcionou.

Eu estav fazendo algo errado.

blz

Obrigado
Tópico encerrado , respostas não são mais permitidas