public function FindList(lv as listview, TonParametre as string) as long For i = 1 To lv.ListItems.Count If lv.ListItems(i) = TonParametre Then FindList= FindList+ 1 For j = 1 To lv.ListItems(i).ListSubItems.Count If lv.ListItems(i).ListSubItems(j) Text2 Then FindList FindList+ 1 Next Next end function
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question