[VB6] Ricerca basata sulla seconda colonna di un controllo ListView

[tippolo]

Salve a tutti
vorrei fare che una ricerca nella seconda colonna di una listview
questo è il codice che utilizzo per farla nella prima colonna

                    With frmGESTDB
                        Set sFound = .lstADD.FindItem(Text1, lvwText, , lvwPartial)
                            If sFound Is Nothing Then
                                MsgBox "Non è stato trovato nessun nominativo corrispondente o che inizi per (" & Text1 & ")", vbCritical, "Errore"
                                Exit Sub
                            Else
                                sFound.EnsureVisible
                                sFound.Selected = True
                                Unload Me
                                .lstADD.SetFocus
                                EvidenziaCampi
                            End If
                    End With

qualcuno sa dirmi dove lo devo modificare?
grazie

[mardok30]

Di sicuro ti posso dire che la ricerca te la fa questa riga:

Set sFound = .lstADD.FindItem(Text1, lvwText, , lvwPartial)

Adesso devi vedere se FindItem accetta il numero della colonna sulla quale effettuare la ricerca. In caso negativo(come credo) basta fare un ciclo for sulla colonna che ti interessa.