for each riga in columnview
if riga[2]=pippo then
azione
endif
next
Public Function PresenteInLista(path As String) As Boolean
Dim presente As Boolean = False
ColumnView_Discoteca.MoveFirst
Repeat
ColumnView_Discoteca.Item.Selected = True
If ColumnView_Discoteca.Item[3] = path Then
presente = True
Break
Endif
Until ColumnView_Discoteca.Movenext()
Return presente
End