Discussion :

[christine1985]

bonjour, je dois realiser un exo en algorithmes mathematiques, j'ai reussit a calculer tout mais apres on me demande de classer des planches donnée en différentes classes en fonction de la superficie relative de leurs defauts.
j'aimerais les classées comme suit classe A: <1
classe B: 1 <=x< 2.5
classe c: 2.5<= x <5
classe D: x=> 5
pour moi c'est un boucle alors j'ai fait comme ceci:
if superficie <1 then
numero de la planche= classe A
elseif
etc,
mais le probleme c'est que " numero de la planche" est une variable double dans le reste de l'exo et qu'ici c'est une variable string
comment dois-je m'y prendre avec visual basic 5
merci

[Delbeke]

Essaye le Select case

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
Select Case Superficie
case < 1
  NumPlanche = "Classe A"
case 1 to 2.49999
  NumPlanche = "Classe B"
case 2.5 to 4.9999
  NumPlanche = "Classe C"
case else
  NumPlanche = "Classe D"
ens select

Ca devrais le faire je pense