[VB5] - Valore da textbox non corretto

[stebux]

Salve to everybody.
Ascoltate un po' qua... ho un problemino abbastanza significativo.
Ho un valore che sta dentro una text box e che per forza di cose non posso dichiarare a variabile perchè il numero che va a finire nella text box viene generato da un tastierino numerico posto sullo schermo (è un programma per un touch screen).
Ora...
Non potendo dichiarare come variabile questo numero mi accade una cosa molto scocciante: se inserisco un valore non intero (es.: 5,25) andando a estrapolare quel valore per metterlo in una variabile (o comunque per fare una stupida operazione:

importo=val(text1)+1

or

importo=val(text1)

il valore che mi restituisce è un intero, è come se mi troncasse le cifre decimali.
Come posso fare?
Aiutatemi vi prego!!

[Toeke]

importo=cdbl(text1)+1

[MMarzia]

Nota La funzione Val riconosce solo il punto (.) come separatore decimale valido. Se si utilizzano separatori diversi (ad esempio in applicazioni internazionali) per convertire una stringa in numero è consigliabile utilizzare la funzione CDbl.

così dice l'MSDN

[Boldan]

Val è un comando che ignora le impostazioni locali del PC (quindi la lingua, il formato delle date e dei numeri).
Se vuoi fargli vedere la virgola devi usare il '.' (punto) che è il separatore decimale diciamo 'standard'.
Potresti anche usare CDouble che è una funzione analoga ma che tiene in considerazione le impostazioni locali ( e quindi accetta la virgola come separatore).
Fai però molta attenzione al fatto che se installi la tua applicazione su di una versione di win che non è italiana il tuo programma non funzionerebbe più.

Se vuoi un suggerimento utilizza Val magari sostiruendo il carattere , con un punto nella tua textbox:

importo = val(replace(text1,",",".") + 1


Spero di essere stato abbastanza chiaro


Ciao

[stebux]

Grazie infinite a tutti e due!
Funziona proprio! Per quanto mi riguarda mi basta il CDbl visto che il pgm verrà installato solo su un computer. Grazie infinite!