Addition de textbox

bonjour ,
j ai 3 textbox , et je veux faire l addition de 2

text1=val(text2)+val(text3)mais le resultat est erroné
text2= 0,7
text3=36,9 et text1 le resultat = 36 ..

merci de votre aide

0 + 36 = 36, le résultat est donc bon.

séparateur décimale = "." ou "," ?

bhaal76 doit avoir raison

une solution passe partout (pour gérer le . ou la ,)

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Private Sub Form_Load() 'text2 = 0.7 et text3 = 36,9 Text1 = ConversE(Text2) + ConversE(Text3) 'Text1 = 36,9 End Sub   Public Function ConversE(Quoi) As Double On Error Resume Next Quoi = CDbl(Quoi) If Err.Number <> 0 Then Err.Clear ConversE = Replace(CStr(Quoi), ",", ".") Else ConversE = Quoi End If End Function

---

un point ou une virgule, quelque soit le parametrage de l'ordi, sa passe

merci de vos reponses ...

je ne peux pas tester ce soir , mais des soustractions sur ces textboxs me donnent de bon resultat ..

mais des demains je teste avec un . pour si ca resoud mon pb

bjs
c etait bien le pb "." ","

merci de votre aide

je comprend trjs pas pourquoi les soustractions marchaient , mais bon