[VB6] Calcolo errato

[OrcaAssassina]

Ho 6 caselle di testo da sommare:

Text50.Text = Text41.Text+Text42.Text+Text39.Text+Text37.Text+Text38.Text+Text40.Text


Se attribuisco a tutte le caselle il numero 2 per esempio invece di darmi

12

mi scrive

222222

Mi unisci i valori

Allora ho detto, trasformo ogni casella in valore

Dim Numero1, Numero2, Numero3, Numero4, Numero5, Numero6, somma As String
Numero1 = Val(Text41.Text)
Numero2 = Val(Text42.Text)
Numero3 = Val(Text39.Text)
Numero4 = Val(Text37.Text)
Numero5 = Val(Text38.Text)
Numero6 = Val(Text40.Text)

Cosi facendo funziona, il problema sta nei decimali....se immetto un numero decomale il "Val" me lo trasforma in intero, come devo fare????

Ciao e grazieeeeeeeee

[Marco Giunio Silano]

A memoria, potrei sbagliare, ma non c'è la CDbl che puoi usare al posto della val? Prova avedere sull'help (io non ho a disposizione help di vb).