[SOLUCIONADO] ListView Mover Filas

[VanHan]

Hola foro, como dice el título como se puede hacer para subir y bajar filas o posicionar filas debajo de alguna otra fila específica.

Salu2
[vHn]

[79137913]

HOLA!!!

Te acabe de armar un pequeño ejemplo:
crea un form con un list view que se llame "LV" y pega el codigo:

Código (vb) [Seleccionar] Expandir

Private Sub Form_Load()
   With lv
        .View = lvwReport
        .ColumnHeaders.Add , , "lo que sea"
        .GridLines = True
        .FullRowSelect = True
   End With
For x = 1 To 10
lv.ListItems.Add , , x
Next
lv.ListItems.Remove 3 ' elimina la posicion 3
lv.ListItems.Add 2, , "hola" 'pone entre la posicion 1 y 2 la palabra hola
Dim aux As String 'variable auxiliar
'intercambia la posicion 6 por la 9
aux = lv.ListItems.Item(9)
lv.ListItems.Item(9) = lv.ListItems.Item(6)
lv.ListItems.Item(6) = aux
End Sub



GRACIAS POR LEER!!!

[VanHan]

Gracias @79137913

Salu2
[vHn]