si valeur TextBox1 n'est pas égale à valeur TextBox2

[mordious]

bonsoir

comment écrire: si "total" n'est pas = à "post "

bonne soirée
----------------------------------------------------------------------------------------------
"tout les TextBox sont des Nbr avec décimal "

Dim total Double, post Double
total = (TextBox3) + (TextBox9) + (TextBox15) + (TextBox21) + (TextBox27) + (TextBox33)
post = (TBpost) "TBposte est un Nbr "
if total=??? Then
MsgBox " faux.", vbExclamation, "une Saisie est fausse "
TBpost.SetFocus
Exit Sub

 

[Staple1600]

Re : si valeur TextBox1 n'est pas égale à valeur TextBox2

Bonsoir à toius


Comme ceci.
If Not total=post Then

PS: Si problème voir avec cette syntaxe : Val(TextBox3)+Val(TextBox9) etc...

 

[mordious]

Re : si valeur TextBox1 n'est pas égale à valeur TextBox2

bonsoir Staple

marche dans un seul sens avec décimale ok pout TextBox 3,9,15,21,27,33
si la valeur de "TBpost" est avec décimal ne marche pas
ex:
total = Val (TextBox3) + Val(TextBox9) + Val(TextBox15) + Val(TextBox21) + Val(TextBox27) + Val(TextBox33)
post = Val (TBpost)
if Not total=post Then
MsgBox " faux.", vbExclamation, "une Saisie est fausse "
TBpost.SetFocus
Exit Sub

bonne soirée

 

[mordious]

Re : si valeur TextBox1 n'est pas égale à valeur TextBox2

désolé

j'ai trouvé

oublié "Dim post Double"

merci pour ton aide
à+