aprendiz_333
09 de Noviembre del 2007

Buenas noches..

Tengo un listview con tres columnas y necesito realizar una busqueda en una determinada columna; tengo este codigo en el cual a travez de un textbox (Text1) solo me permite buscar en la primera columna. Que podria modificar en el codigo para que me permita buscar SOLAMENTE en la tercera columna ??

Private Sub Text1_Change()
Dim sItem As ListItem
Set sItem = ListView1.FindItem(Text1.Text, , , lvwPartial)
If Not sItem Is Nothing Then
sItem.EnsureVisible
sItem.Selected = True
End If
End Sub

mvallejos
09 de Noviembre del 2007

En cada item, la 1er columna es el text, las siguientes son SubItems
Fijate

Dim i as Integer

For i = 1 To ListView1.ListItems.Count
If ListView1.ListItems( i ).SubItem(2) = Text1.Text Then
ListView1.ListItems( i ).Ensurevisible
ListView1.ListItems( i ).Selected = True
End If
Next i

Como la 1er columna es el text, la 3ra es el SubItem(2)

Saludos