comparaison valeur list view nombre virgule

Version imprimable

31/07/2008, 09h31
tro2blabla

comparaison valeur list view nombre virgule

:salut:

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 ?!
31/07/2008, 13h04
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)

Code:

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)

à 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:

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

31/07/2008, 16h05
tigunn

Code:

format(value, "0.00")
31/07/2008, 16h10
tro2blabla

merci pour l'aide ;)