trouver l'erreur !?Résolu

Question

salut à tous! j'essaye d'afficher un résultat dans Label9.Caption mais çà n'affiche rien! grrr je n'arrive pas à trouver mon erreur, donc si vous avez une idée dîtes le moi!!! voilà une partie du code: Dim I as single Dim w as integer Dim h as single If Text2.Text <> "" and Text2.Text <> "ne pas mettre mm" and Label11.Caption <> "?" and Label10.Caption <> "?" Then I = Val(Text2.Text) + Val(Label11.Caption) + Val(Label10.Caption) Label9.Caption = "" End if If Val(I) = 2.5 Then Label9.Caption = Val(I) Elseif 2.5 > Val(I) > 3 Or Val(I) = 3 Then Label9.Caption = 3 End if For w 0 to w 2 Then If (3 + Val(w)) > Val(I) > (4 + Val(w)) Or Val(I) = (4 + Val(w)) Then h = 4 + Val(w) Label9.caption = Val(h) End if Next For w 0 to w 2 Then If (6 + (2 * Val(w))) > Val(I) > (8 + (2 * Val(w))) Or Val(I) = (8 + (2 * Val(w))) Then h = 8 + (2 * Val(w)) Label9.caption = Val(h) End if Next . . . Ps: le Label9.caption s'efface bien mais il n'affiche pas de résultat! Je ne sais pas si c'est un problème de syntaxe ou de façon d'ecrire les chiffres ( du type ##.#) ou encore de déclaration des variables ... bref j'en sais rien !!! Merci et A+

jrivet · Accepted Answer

Salut,

NON,

Ca revient au meme au meme dans ton IF tu as ecrit

Si Val(i) est inferieure à 2.5 AND Val(i) est Superieure ou egale à 3... 

Question de logique: Y a t il une valeur de Val(I) qui peut Respecter cette condition -> Je ne pense pas.

LA Bonne question  est Qu est ce aue tu veux comme condition.

Si tu veux une valeur comprise entre 2.5 et 3:

IF Val(I)>= 2.5 And Val(i)<= 3 Then...  

J espere avoir pu t'aider un peu
@+
Julien

Mindiell · Answer

Tu as essay&#233; de le remplir directement ?
Verifie que tu rentres bien dans tes if...

Mindiell Software

jrivet · Answer

Salut,

Deja je pense que cette syntaxe n est pas correct

"For w 0 to w 2 Then"  (en vb6 en tout cas)


@+
Julien

jrivet · Answer

Ensuite.

Si I = 2.6

Cette condition n'est pas respecter:

ElseIf 2.5 > Val(I) > 3 Or Val(I) = 3 Then (il faut le faire en plusieur ligne (le x>y>z n est pas trop aime)
Donc deja au vu de cela il faut revoir un peu ton code

@+
Julien

stuntman_91 · Answer

qu'est ce que tu veux dire par directement???
pour les if j'ai v&#233;rifi&#233;, les conditions ne se recoupent pas et il y a autant de if que de end if.

++

Gobillot · Answer

ces tests sont faux: 

ElseIf 2.5 > Val(I) > 3 Or Val(I) = 3 Then ...


le r&#233;sultat d'une comparaison est un Bool&#233;en:

2.5 > Val(I)  --> donne 0 ou -1



ce qui fait que la deuxi&#232;me comparison sera toujours fausse

  0 > 3  --> donne Faux

-1 > 3  --> donne Faux



Daniel

PCPT · Answer

salut,

sachant &#233;galement que SI (et ce n'est pas cas) la syntaxe &#233;tait bonne, je connais peu de valeurs qui soient &#224; la fois <2.5 et en m&#234;me temps >=3



++

stuntman_91 · Answer

ok


alors en gros je n'ai pas la possibilit&#233; de faire d'encadrement!
Est ce que cela serait mieu???


if (2.5>Val(I)) = 0 and (Val(I)>=3) = 0 Then


....

(je suppose que l'on obtient 0 si c'est vrai et -1 si c'est faux)

par contre pcpt je n'ai pas compris ou &#233;tait le probl&#232;me:
je peux avoir entre 2.5 et 3 : 2.6 ; 2.7 ....

++

PCPT · Answer

StuntMan_91 -> JRivet a r&#233;pondu pour moi ;)

stuntman_91 · Answer

oups!!!
oui je vien de me rendre compte de mon enorme boulette !!!! mdr
merci les gars
je reviendrais vous dire si ca marche

++

stuntman_91 · Answer

j'ai fai sa:

If Val(I) = 2.5 Then
 Label9.Caption = Val(I)
 ElseIf 2.5 < Val(I) And Val(I) <= 3 Then
 Label9.Caption = 3
End IfFor w 0 To w 2
 If (3 + Val(w)) < Val(I) And Val(I) <= (4 + Val(w)) Then
  h = 4 + Val(w)
  Label9.Caption = Val(h)
 End If
Next

mai ca ne marche toujours pas !!!

++

stuntman_91 · Answer

g trouv&#233; 

c 'est 
For w 0 to 2            et pas      For w 0 to w =2

merci &#224; tous et &#224; bient&#244;t

Gobillot · Answer

&#231;a fait pas d'erreur parce que c'est pris comme &#231;a:

For w 0 To (w 2)


(w - 2) est un Bool&#233;en 



si w = 2:

    For w = 0 to -1   donc pas de boucle

si w <> 2:

    For w = 0 to 0   une seule boucle



Daniel

stuntman_91 · Answer

ok

c'est bon &#224; savoir 
merci
++

Trouver l'erreur !?

14 réponses

Discussions similaires