LISTVIEW NA POSICAO ANTERIOR

MARIOANDRADE 22/02/2014 20:27:00
#435162
Olá meus amigos, estou tentando bolar um código para o listview manter-se na posição inicial após uma alteração (evitando ter que rolar) mas não tenho ideia de como fazer isso, provavelmente deve ser a propriedade scroll (se é que a listview tem essa propriedade) o codigo abaixo eu uso para selecionar o mesmo item, mas as vezes ele é por exemplo o item de numero 20 e tenho que rolar para visualiza-lo. 

 Dim num As Integer
                num = lstPrincipal.SelectedItem.Index              
            lstPrincipal.SetFocus
            lstPrincipal.ListItems(num).Selected = True
            codcli = lstPrincipal.SelectedItem
                lblCod.Caption = [Ô]Código:[Ô] & [Ô] [Ô] & codcli
                txtNome.Text = lstPrincipal.SelectedItem.SubItems(1)
                txtTel.Text = lstPrincipal.SelectedItem.SubItems(2)
                cmbStatus.Text = lstPrincipal.SelectedItem.SubItems(3)
                cmbProduto.Text = lstPrincipal.SelectedItem.SubItems(4)


Espero que tenham entendido.
ASHKATCHUP 23/02/2014 17:57:08
#435179 Resposta escolhida
Usa isso:


lstPrincipal.SelectedItem.EnsureVisible
MARIOANDRADE 23/02/2014 18:05:11
#435180
Citação:

:
Usa isso:


lstPrincipal.SelectedItem.EnsureVisible



Valeu mesmo, mais simples do que imaginei e de uma utilidade gigantesca.
Tópico encerrado , respostas não são mais permitidas
Voltar