Visual Basic - Desplazamiento por LISTVIEW

Hola amigos, si alguien conoce como poder desplazarme por un LISTVIEW mediante código, echenme una manito, es muy importante lo tenfo que hacer urgente, Ojo, el desplazamiento es hacia arriba y abajo pasar registro por registro dentro del LISTVIEW.

Gracias.

haz lo sgte...

1°- Definde 2 variables, una guardará la posicion del item seleccionado inicialmente (PosInicial) y la otra, almacenara la posicion que quedará seleccionada despues (PosFinal)

2° Identifica cual es el item que está seleccionado actualmente

For I=1 to listview.listittems.count
if listview.listittems(i).selected=true then
PosInicial=i
end if
next

3° Identifica si se presiono la flecha hacia arribao hacia abajo y procede a seleccionar el item que corresponda

Select case keycode

case 38 'hacia arriba
PosFinal= PosInicial - 1
listview.listittem(PosFinal).selected=true

case 40 'hacia abajo
PosFinal=PosiInicial + 1
listview.listittem(PosFinal).selected=true

end select

todo esto lo haces en el evento KeyDown del listview, cuando llega al primer y al ultimo registro no probé si da algun error o no, eso te toca veriguarlo(y resolverlo si se necesita) a ti.

espero te ayude

Thanks.