Discussion :

[tro2blabla]

mon probleme de ce matin

par exemple ,j'ai une listview qui contient des valeurs telles quelles :
0.50
1
1.50
2
2.20
5.12
ect ect

à l'aide d'un évenement d'un bouton "ajouter" , j'insère une autre valeur que j'ai écris dans un "textbox" comme par exemple 3 -->> jusque là ça marche !

mais mon soucis concerne les nombres à virgules , en effet lorsque j'inscris 1.5dans ma textbox , je la compare avec les valeurs contenues dans la listview ...

dans mon cas : je compare 1.5 et logiquement je devrais avoir un message me disant que "ce chiffre est déjà dans la listeview"
puisqu'en effet 1.5 = 1.50
mais cela me l'insére quand meme !!! alors que je ne le souhaite pas ! car pour avoir mon message je dois inscrire 1.50 mais le soucis c'est que l'utilisateur de mon programme ne va pas penser à mettre 1.50 dans la texte box , c 'est à moi de gérer cela !!

quelqu'un peut-il m'aider ?!

[Danyel]

Plusieurs solutions :
- Soit tu fais une pre-comparaison au format numerique de tes valeurs par rapport à ta nouvelle.
- Soit tu utilises la commande format avant l'insertion en specifiant 2 chiffres apres la virgule (#.00)

[tro2blabla]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 Dim valeur As Integer = Txt_Ajout_valeur.Text
        cmd.Connection = conn
        Dim existe As Boolean = False
        Try
            For i As Integer = 0 To (Me.Listview.Items.Count - 1)
                If (valeur= (Listview.Items(i).SubItems(1).Text)) Then
                    existe = True
                End If
            Next i
            If existe = True Then
                MsgBox("La valeur existe déjà", MsgBoxStyle.Exclamation)

désolé je sais pas utiliser le format (#.00)

[Faladin]

à ta place j'obterais pour la première solution de Danyel, le problème c'Est que dans ta listview, c'est des strings, et en comparaison de string, chaques caratères comptent!

Donc effectivement 1.5 != 1.50

Si tu fais une comparaison en castant tes valeurs en nombre, ça va fonctionner à ce moment...quelque chose comme:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Dim trouver as boolean = False
For each Value in ListView.Items
if cdbl(Value) = cdbl(Textbox.text) then
trouver = True
Exit For
end if
next
 
if trouver then
'Ne pas ajouter la valeur
else
'ajouter la valeur
end if

[tigunn]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

format(value, "0.00")

[tro2blabla]

merci pour l'aide