Syntaxe If Then Else Visual basic
Résolu
Bonjour,
je debute en visual basic et ai un probleme de syntaxe.
Voila mon code.
If x < 3 Then pm = 45 And mr = 1.2
If 3 <= x < 6 Then pm = 43 And mr = 1.125
If 6 <= x < 9 Then pm = 40 And mr = 1.125
If 9 <= x < 12 Then pm = 38 And mr = 1.125
If 12 <= x < 15 Then pm = 35 And mr = 1.125
If 15 <= x < 20 Then pm = 34 And mr = 1.125
If 20 <= x < 30 Then pm = 33 And mr = 1.125
If 30 <= x < 40 Then pm = 32 And mr = 1.125
If 40 <= x < 50 Then pm = 31 And mr = 1.125
If 50 <= x < 60 Then pm = 30 And mr = 1.125
If x >= 60 Then pm = 29 And mr = 1.05
je debute en visual basic et ai un probleme de syntaxe.
Voila mon code.
If x < 3 Then pm = 45 And mr = 1.2
If 3 <= x < 6 Then pm = 43 And mr = 1.125
If 6 <= x < 9 Then pm = 40 And mr = 1.125
If 9 <= x < 12 Then pm = 38 And mr = 1.125
If 12 <= x < 15 Then pm = 35 And mr = 1.125
If 15 <= x < 20 Then pm = 34 And mr = 1.125
If 20 <= x < 30 Then pm = 33 And mr = 1.125
If 30 <= x < 40 Then pm = 32 And mr = 1.125
If 40 <= x < 50 Then pm = 31 And mr = 1.125
If 50 <= x < 60 Then pm = 30 And mr = 1.125
If x >= 60 Then pm = 29 And mr = 1.05
3 réponses
-
ContributeurBonjour,
en utilisant If, Then et Else :If x < 3 Then pm = 45 mr = 1.2 Else If x < 6 Then pm = 43 mr = 1.125 Else IF x < 9 Then ... Else pm = 29 mr = 1.05 End If
En utilisant le Select case :Select Case x Case < 3 pm = 45 mr = 1.2 Case < 6 pm = 43 mr = 1.125 Case < 9 ... Case < 60 pm = 30 mr = 1.125 Case Else pm = 29 mr = 1.05 End Select
Cordialement. -
Bonjour,
Tu ne peux pas faire un encadrement en programmation. De plus les instructions à exécuter ne peuvent contenir "AND":
if 3 <= x < 6 Then pm = 43 And mr = 1.125 est incorrect
tu dois écrire:
IF x <= 3 AND x < 6 then
pm = 43
mr = 1.125
EndIF
J'espère que ca t'aide
Glouton. -
Glouton et chousette, je vous remercie de votre aide qui m'a etait precieux mon programme marche a merveille maintenant .
Bonne continuation et merci encore !!!
