Discussion :

[Attila54]

Bonjour,
voila, je rencontre un souci dans le traitement d'une donnée, ceci dans une boucle pourtant simplissime :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
' la valeur affichee par QILEFT.Text est chargée via une feuille excel et pas de souci de ce coté
'Dans mes declarations initiales
Public ValQILEFT As Double
Public ValQI As Double
'pour l'oeil gauche
          If TextBoxosod.Text = "OS" Then
                If valQILEFT <= -0.3 Then
                ValQI = 1
                End If
                If valQILEFT > -0.3 Or valQILEFT < 0.3 Then
                ValQI = 2
                End If
                If valQILEFT >= 0.3 Then
                ValQI = 3
                End If
 QI#Text = VALQI.ToString("0.00")
          End If

Comme ceci, quelle que soit la valeur affichée par QILEFT ma valeur affichée par la textbox QI est toujours de 2.00

si maintenant je teste comme cela :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
'Dans mes declarations initiales
Public ValQILEFT As Double
Public ValQI As Double
'pour l'oeil gauche
If TextBoxosod.Text = "OS" Then
      If QILEFT.Text <= "-0.30" Then
      QI.Text = "1.00"
      End If
      If QILEFT.Text > "-0.30" Or QILEFT.Text < "0.30" Then
      QI.Text = "2.00"
      End If
      If QILEFT.Text >= "0.30" Then
      QI.Text = "3.00"
      End If
End If

j'ai les bonnes valeurs affichées pour les cas 2 et 3 mais pour le cas 1 (donc valeurs <= -0.3 du style -0.36), j'ai le 2 affiché au lieu du 1

Que peut il se passer ?
Merci bien

[Ashireon]

Remplace ton OR par AND

-0.36 et aussi inférieur a 0.3 par définition du coup
il exécute la première condition effectivement -0.36 et inférieur a -0.3
donc il met a 1
Mais dans la seconde condition il voit que -0.36 est inferieur à 0.3 et il repasse donc ta variable a 2
Vu la vitesse tu ne vois pas le passage


Ton second cas c'est que tu es compris entre -0.3 et 0.3 et pas Ou 0.3

[Meiteisho]

Ca ne serait pas un problème dû au fait que tu compare des chaînes de caractères et non des nombres?

[Attila54]

bonjour a vous 2
c'est sur, je viens de voir mon erreur sur le OR mais même en corrigeant ca ne fonctionne pas
J' ai effectivement un probleme dû au fait que je compare des chaînes de caractères et non des nombres, alors j'ai essayé ceci :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
If TextBoxosod.Text = "OS" Then
                      Select Case VALQILEFT
                        Case Is <= -0.3
                            ValQI = 1
                        Case Is > 0.3
                            ValQI = 2
                        Case Else
                            ValQI = 3
                      End Select
                      QI.Text = ValQI.ToString("0.00")
End If

mais ca marche po non plus, j'ai 0.00 affiché dans mon textbox QI

[Ashireon]

Code :

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

1
2
 
DIm VALQILEFT as double = convert.toDouble(TATEXTBOX.text)

Ensuite fait les comparaison avec ta variable en double

[Attila54]

Ah bah je ne comprends absolument rien a ce que tu me montres la, et pourtant cela fonctionne. Peux tu me dire ce que j'ai fait ????? je prefererais plutôt que de copier betement ta ligne

[Meiteisho]

En fait tu type ta variable VALQILEFT en double (Type pouvant contenir des decimaux signé). Comme ca ta comparaison se fait bien sur une valeur et pas sur une chaîne de caractères.