Syntaxe If Then Else Visual basic
Résolu
maxsky
Messages postés
65
Date d'inscription
Statut
Membre
Dernière intervention
-
gloutonbargeot Messages postés 349 Date d'inscription Statut Membre Dernière intervention -
gloutonbargeot Messages postés 349 Date d'inscription Statut Membre Dernière intervention -
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
A voir également:
- Basic if then
- Microsoft 365 basic - Accueil - Microsoft Office
- Visual basic - Télécharger - Langages
- Visual basic editor - Télécharger - Langages
- File renamer basic - Télécharger - Gestion de fichiers
- Quick basic - Télécharger - Édition & Programmation
3 réponses
Bonjour,
en utilisant If, Then et Else :
En utilisant le Select case :
Cordialement.
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.
chossette9
Messages postés
4239
Date d'inscription
Statut
Contributeur
Dernière intervention
1 311
Un signe de vie ne serait pas de trop...
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.
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.