condition entre deux chiffreRésolu

Question

Salut ! j'ai deux textbox (T_Montant et T_Timbre) et un Timer1 En fait, voilà exactement ce que je souhaite avoir comme résulat : Si T_Montant est entre 0 et 5000 alors T_Timbre = 0 Si T_Montant est entre 5001 et 100000 alors T_Timbre = 100 Si T_Montant est entre 100001 et 500000 alors T_Timbre = 500 Si T_Montant est entre 500000 et 1000000 alors T_Timbre = 1000 Si T_Montant est entre 1000001 et 5000000 alors T_Timbre = 2000 Si T_Montant est supérieur à 5000000 alors T_Timbre = 5000 Mais quand je le met dans des conditions IF ca ne marche pas... je sais qu'il n'y a pas de signe "entre" mais j'ai beau essayé avec les < <> > >= = mais aucun résultat correct... Pouvez vous m'aider svp ? Merci d'avance ---------- OS : Windows XP SP2 Platforme : VB 6.0 + SP6 Ok VB6.0 c'est pas net !

Charles Racaud · Accepted Answer

Tu peux simplifier par un switch :

Select Case T_Montant
  Case Is <=  5000
    T_Timbre = 0
  Case Is  <=  100000
    T_Timbre  = 100
  Case Is <=  500000
    T_Timbre = 500
  Case Is  <= 1 000000
    T_Timbre  = 1000
  Case Is <= 5000000
    T_Timbre = 2000
  Case Else
    T_Timbre = 5000
End Select

Coloration syntaxique vb/vba/vb.net

__________
  Kenji

Kevin.Ory · Answer

Salut,

If T_Montant > 5000000 
 Then
    T_Timbre = 5000
ElseIf 
T_Montant > 1000000

 Then
    T_Timbre = 2000

ElseIf 
T_Montant > 500000

 Then
    T_Timbre = 1000

...

Sinsitrus · Answer

Merci beaucoup a tout les deux, je vais tester ^^

Condition entre deux chiffre

3 réponses

Votre réponse