[vb.net](listview)-voir si une valeur existe

Résolu/Fermé
relax. Messages postés 380 Date d'inscription vendredi 15 mai 2009 Statut Membre Dernière intervention 8 mars 2013 - 29 sept. 2012 à 17:08
relax. Messages postés 380 Date d'inscription vendredi 15 mai 2009 Statut Membre Dernière intervention 8 mars 2013 - 3 oct. 2012 à 18:21
Bonjour,
j'ai dans ma form un textbox1 , une listview1 et un button1

je voudrais que quand je clique sur le button1 , le programme essaye de voir si la valeur du textbox1 existe dans la listview1 et ceci peut importe quel item .

voici mon code :
    
    For Each item As ListViewItem In ListView1.Items
            If item.Name.Contains(textbox1.Text) Then
                MsgBox("la valeur existe !")
            Else
                MsgBox("la valeur n'existe pas!")

            End If


Le programme fonctionne , sauf qu'il verifie tout les subitems , ce qui produit une avalanche de msgbox , je voudrais qu'il n'inclue pas les subitems .

merci d'avance .




2 réponses

relax. Messages postés 380 Date d'inscription vendredi 15 mai 2009 Statut Membre Dernière intervention 8 mars 2013 26
30 sept. 2012 à 23:01
serieux mais a quoi ça serre se forum , meme pas un" coucou vas-y que j'essaye de t'aider "....

bon j'ai resolue le prob voila le code pour ceux que ça interesserai :
 Dim FileFound As Boolean
 
    For Each item As ListViewItem In ListView1.Items
    
      If item.Text = TextBox1.Text Then
        MsgBox("Le fichier existe")
        FileFound = True
        Exit For
      End If
    Next
    If Not FileFound Then
      MsgBox("Le fichier n'existe pas")
    End If
0
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
Modifié par lermite222 le 1/10/2012 à 10:30
Bonjour,
   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
        For Each item As ListViewItem In ListView1.Items 
            If item.Name.Contains(TextBox1.Text) Then 
                MsgBox("la valeur existe !") 
                Exit Sub 
            End If 
        next 
        MsgBox("la valeur n'existe pas!") 
    End Sub 

Plus simple
A+

Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
NOTE : Je ne répond pas aux MP pour les questions techniques.
0
relax. Messages postés 380 Date d'inscription vendredi 15 mai 2009 Statut Membre Dernière intervention 8 mars 2013 26
3 oct. 2012 à 18:21
merci
0