Addition de caractère

[Temjeh]

Bonjour

Je cherche la syntaxte pour addition dans textbox du 1er caractère avec le 2ème +3ème(et y mettre si possible une gestion d'erreur si valeur est alpha ne l'aditionne pas)

Ceci n'est pas bon:

If Mid(TextBox1, 1, 1) + Mid(TextBox1, 2, 1)+ Mid(TextBox1, 3, 1) = 3 Then

A+

Temjeh

 

[dg62]

Bonjour Temjeh

If val(Mid(TextBox1, 1, 1)) + val(Mid(TextBox1, 2, 1))+ val(Mid(TextBox1, 3, 1)) = 3 Then


une premiere approche.


Précision, un caractère alphabétique aura com valeur 0

val('a')=0
val(a)+val(1)+val(2) donnera 3

Message édité par: dg62, à: 17/06/2006 13:10

 

[porcinet82]

Salut Temjeh,

Dans un textbox, ce que tu rentres est considéré comme du texte et non du numérique, il te suffit alors de mettre If Val(Mid(TextBox1, 1, 1)) + Val(Mid(TextBox1, 2, 1))+ Val(Mid(TextBox1, 3, 1)) = 3 Then

@+

Edition : Rhoo aujourd'hui, je manque de rapidité, salut Didier 😉

Message édité par: porcinet82, à: 17/06/2006 13:09

 

[Temjeh]

Merci beaucoup pour votre temps et votre précision

A+

Temjeh