bdgta
Messages postés63Date d'inscriptionjeudi 2 janvier 2003StatutMembreDernière intervention 8 septembre 2008
-
23 févr. 2006 à 12:33
bdgta
Messages postés63Date d'inscriptionjeudi 2 janvier 2003StatutMembreDernière intervention 8 septembre 2008
-
24 févr. 2006 à 13:23
Bonjour,
Je voudrais recherche une valeur dans une listview,
en tapant F2 dans visual basic, j'ai trouvé ceci:
Function FindItem(sz As String, [Where], [Index], [fPartial]) As ListItem
J'ai trouvé ceci aussi sur ce forum.
FindItem "motif" -> recherche de text dans la premiere colonne, donc
FindItem "motif", lvwText -> equivalent
FindItem "motif", lvwSubItem -> Recherche dans les subItems
FindItem "motif", lvwSubItem, n -> Recherche dans la colonne n
FindItem "motif", lvwTag -> Recherche dans le Tag des Items
FindItem "motif", lvwText, lvwPartial -> Recherche dans le texte de l'Item
FindItem "motif", lvwText, lvwWhole -> Recherche dans le texte de l'Item (mot complet)
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202175 23 févr. 2006 à 13:05
voici un exemple
Dim Item as ListItem
Set Item = ListView1.FindItem ( "75015", lvwText,, lvwPartial )
If Item is nothing
MsgBox "Recherche infructueuse"
Else
Msgbox "Un Item dont le texte contient 75015 a été trouvé"
End if
bdgta
Messages postés63Date d'inscriptionjeudi 2 janvier 2003StatutMembreDernière intervention 8 septembre 2008 23 févr. 2006 à 15:42
Je viens de faire ceci
Dim Item As ListItem
Dim rech As String
rech = Text1.Text
Set Item = List.FindItem(rech, lvwText, lvwPartial)
If Item Is Nothing Then
Set Item = List.FindItem(rech, lvwSubItem, lvwPartial)
If Item Is Nothing Then
MsgBox "Recherche infructueuse"
Else
MsgBox "Un Item dont le texte contient " + rech + " a été trouvé"
End If
Else
MsgBox "Un Item dont le texte contient " + rech + " a été trouvé"
End If
Vous n’avez pas trouvé la réponse que vous recherchez ?