Praticamente prendo dei valori che sono in delle label e li sommo tra di loro, siccome questi numeri sono rappresentati nelle label con la formattazione italiana (#.###,##) quando vado a fare le somme vb va in palla (giustamente, visto che VAL vuole il "." come separatore dei decimali) e quindi mi restituisce risultati del tutto sbagliati.
Ora ho risolto facendo una funzione che praticamente fa il replace del separatore decimale con il "." e di quello delle migliaia con "".
Posto il codice della funzione che può tornare utile a qualcuno...
codice:
Public Function ReadText(Str As String) As Double
ReadText = Val(Replace(Replace(Replace(Str, fLocaleInfo(LOCALE_STHOUSAND), ""), fLocaleInfo(LOCALE_SDECIMAL), "."), "€", ""))
End Function
In ogni caso, nel form_load impostavo quello che ho chiesto, avrei evitato di fare la funzione e applicarla su tutti i calcoli...
Spero di essermi spiegato.