Insertar en ListView siempre en la primera fila.

[E N T E R]

Tengo este formulario con un ListView, quiero que al insertar el nuevo contenido siempre quede primero.




Este es mi codigo que inserta en el ListView.

Código: (VB) [Seleccionar]

Private Sub Command1_Click()
    Set Lv = ListView1.ListItems.Add(, , txtBuscar.Text)
    With Lv
        .SubItems(1) = Format(Time, "hh:mm:ss")
        .SubItems(2) = lblEstado.Caption
    End With
End Sub
Lo que no se puede hacer es ordenar, por que nunca se va insertar en un orden.

[seba123neo]

usa el indice, por ejemplo:

Código: (vb) [Seleccionar]

ListView1.ListItems.Add 1, , "Item1"
ListView1.ListItems.Add 1, , "Item2"
al final Item2 va a pisar el Item1 y queda en primera posicion..

saludos.

[E N T E R]

De lujo Seba, ni se me ocurro esa idea, muchas gracias

Código: (VB) [Seleccionar]

Private Sub Command1_Click()
    Set Lv = ListView1.ListItems.Add(1, , txtBuscar.Text)
    With Lv
        .SubItems(1) = Format(Time, "hh:mm:ss")
        .SubItems(2) = lblEstado.Caption
    End With
End Sub
Saludos.