verifier une valeur dans listview en vb.net Résolu/Fermé

Question

Bonjour, 

je crée une textbox une listview avec une seule colonne et je saisis des noms avec un button1
je veux avoir un message d'erreur qui s'affiche si le nom que j'entre existe déjà dans la listview et surtout qu'il ne rentre pas ce nom dans la listview


voilà le code que j'ai fait et qui ne marche pas 


 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim Element As New ListViewItem

Element.Text = TextBox1.Text
        ListView1.Items.Add(Element)

For Each item As ListViewItem In ListView1.Items
            If item.Name.Contains(TextBox1.Text) Then

MessageBox.Show("attention le nom existe déjà")
                Exit Sub
            End If
        Next

End Sub

j'ai aussi essayé  for i as integer =0 to listview1.items.count-1 
if listview1.items(i).text= textbox1.text
 messagebox 
et cela ne marche pas ou alors il m'affiche le message mais met quand même le nom dans la liste

Utilisateur anonyme · Answer

Bonjour

crée une List(of string), avant d'ajouter le mot, teste s'il existe dans la liste avec .Any().
S'il existe tu sors de la sub,
s'il n'existe pas tu l'ajoute à la liste et au listView.

Kalissi · Answer

Bonjour,

Exemple :

Private Sub btnListView_Click(sender As Object, e As EventArgs) Handles btnListView.Click

Dim Valeur As String = String.Empty

If (Not (String.IsNullOrEmpty(Me.TextBox1.Text))) Then
            Valeur = Me.TextBox1.Text
            If (InsereElement(Valeur)) Then
                MessageBox.Show("attention le nom existe déjà")
            Else
                ListView1.Items.Add(Valeur)
            End If
        End If

End Sub

Private Function InsereElement(ByVal pValeur As String) As Boolean

Dim Flag As Boolean = False
        Dim Element As ListViewItem = Nothing

For Each Element In ListView1.Items
            If (Element.Text.Contains(pValeur)) Then
                Flag = True
                Exit For
            End If
        Next

Return Flag

End Function

K

Utilisateur anonyme · Answer

Bonjour 
Merci de ta réponse
Mais je ne comprends pas bien
Dim Valeur As String = String.Empty
Que signifie cette ligne ?
Est ce une façon de dire valeur.text=« »
C’est à dire qu’il n’y a pas de texte
Je suis très débutant
Merci d’une réponse
--

Kalissi · Answer

Bonjour,

C'est mon style de programmation ...
Lorsque je déclare une variable, j'initialise immédiatement sa valeur.

Essai ce code ...

Dim Longueur As Int32 = 0
        Dim Chaine As String = String.Empty

Longueur = Chaine.Length

Chaine = Nothing

Longueur = Chaine.Length

Selon ma perception, il est toujours préférable de connaître l'état d'une variable.
Si ce n'est pas le cas, il nous faut tester cette variable avant d'appliquer une action sur celle-ci ...

ex. :

If (Not (String.IsNullOrEmpty(Me.TextBox1.Text))) Then

K

Verifier une valeur dans listview en vb.net

4 réponses

Discussions similaires