Discussion :

[chouchouboy]

Bonjour,
pour l'école, on me demande d'écrire un algorithme mais je n'y arrive pas. Le sujet dit qu'une remise de 5 % est accordée aux employés du rayon vente ayant plus d'un an d'ancienneté et une remise de 3 % pour les autres employés ayant plus d'un an d'ancienneté. Ceux qui ont moins d'un an d'ancienneté n'ont rien.
J'ai commencé à écrire un bout de code mais ensuite, je pense que la prof veut nous faire utiliser Select case... mais je ne sais pas comment l'utiliser avec autant de variables...
Voici mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub calcul_reduction ()
Dim 
	rayon, qualif, ancienneté, prix_fact, remise as Double
const 
	remise_employés as Double = 5%
        remise_autres as Double = 3%
 
  ' saisie
	rayon= Inputbox("Travaillez-vous au service ventes ? O/N")
	qualif= Inputbox("Vous êtes employé, tapez E, vous êtes chef de rayon, tapez C")
	ancienneté= Inputbox("Votre ancienneté est-elle supérieure à 1 an ? O/N")
	prix_fact= InputBox("Quelle est le prix de votre facture ?")
 
Select case

Merci de votre aide

[ced600]

Voici un example de select case :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
payment= Inputbox("Choose a payment mod : Cash or Visa or AmEx or another choice")
select case payment
 case "Cash"
   msgbox "You are going to pay cash"
 case "Visa"
   msgbox "You are going to pay with visa"
 case "AmEx"
   msgbox "You are going to pay with American Express"
 case Else
   msgbox "Unknown method of payment"
end select

Dans ton cas si tu ne mets pas toutes les réponses à tes questions dans une seule variable, tu n'as pas d'intérêt à utiliser le select case.

Je pense que votre prof s'attends à ce que vous fassiez un "menu" dans votre input box. Quand je parle de "menu" je veux dire un texte qui présente les différentes combinaison possible suite au pré-requis.
Pour chaque combinaison tu lui associes une lettre et tu récupère la lettre dans une seule variable.
Là tu peux appliquer ton select case.