LISTVIEW - PESQUISA NO LISTVIEW

JESUEL.OLIVEIRA 16/04/2007 11:30:26
#212072
Amigos, Utilizo o codigo abaixo para deixar o foco no registro que alterei ou inclui no listview, ele funciona perfeito, so que quando tenhos mais que 1 página de dados o registro fica no foco correto só que a LISTVIEW fica no inicio.

Por exemplos, apos fazer a inclusão dos dados, eu limpo e carrego novamente a listiview o foco fica no registro incluso so que a lista fica na primeira pagina, tem como ficar mostrar na tela e o registro focado com mais que uma página?

Dim item As ListItem
Set item = LIS_CADASTRO_PACIENTES.FindItem(Format(ICODIGO_PACIENTE, "0#####"), lvwText, , lvwPartial)
If item Is Nothing Then
Else
item.Selected = True
End If
FFCOUTO 16/04/2007 11:51:45
#212076 Resposta escolhida
Faça assim

item.Selected = True
item.EnsureVisible    'Faz com que o item fique visível na lista



espero ter ajudado
JESUEL.OLIVEIRA 16/04/2007 16:01:54
#212132
Valew FFCOUTO, Obrigado!!!
Tópico encerrado , respostas não são mais permitidas
Voltar