Discussion :

[hay2006]

salut à tous le monde je voudrais vous raconter mon probleme afin que certains peuvent me donner la solution.
j'ai fait une form avec une matrice de textbox groupés en vertical.
ces textbox contiennent des valeurs "single" que je veux les utiliser apres...
c'est à dire que par exemple text3=text1+text2
avec text1 et text2 sont entrees manuellement.
comment convertir les valeurs contenus dans text1 et text2 de "string" à "single" et en plus comment afficher le resultat avec 3 chiffres avant virgule et 3 apres virgule et tous mes remerciements d'avance...

[SfJ5Rpw8]

pour transformer en single:

Code :

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

1
2
3
 
dim r as single
r = Val(textbox1)

pour l'addition :

Code :

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

1
2
 
TextBox3 = Format(Val(TextBox1) + Val(TextBox2), "#.###")

[méphistopheles]

juste un petit ajout, afin d'éviter des bug, il serais peut-être préférable de vérifier que les valeurs contenues dans tes textbox sonts numéques.

pour cela, teste-les avec la fonction isnuméric(tontexte.text)

salut.

[AdHoc]

Bonjour,
personnellement, je préfére les fonctions de conversions Cint, cdbl et csng à val (Pb de format international).