Italian errore nella visualizazione di un importo

nonno said:

Ciao ragazzi, non riesco a capire il motivo, il risultato di un importo mi scrive la virgola al posto del punto e viceversa, devo istallare una specifica libreria?.
Grazie mille per eventuali suggerimenti.


Dim Valore1 As Float
Dim Valore2 As Float

lbl1.Text = 2121.50
lbl2.Text = 0.50
Valore1 = lbl1.Text
Valore2 = lbl2.Text

lbl1.Text = NumberFormat2(Valore1 + Valore2,0,3,2, True) risultato 2,122.00 invece di 2.122,00

Click to expand...

dim n As String = NumberFormat2(Valore1 + Valore2,0,3,2, True) 
lbl1.Text = zEnToIt(n)

Sub zEnToIt(numero As String) As String
    Dim z As String
    z=numero.Replace(",","#")
    z=z.Replace(".",",")
    z=z.Replace("#",".")
    Return z
End Sub

Filippo said:

dim n As String = NumberFormat2(Valore1 + Valore2,0,3,2, True)
lbl1.Text = zEnToIt(n)

Click to expand...

Dim numero, numero1 As AHNumeric

Dim risultato As Double = "119654.56"
   
    numero.InitializeCurrency
    Log(numero.Format(risultato))
   
    numero1.InitializeNumber
    Log(numero1.Format(risultato))

119.654,56 €
119.654,56

Click to expand...

MarcoRome said:

Dim numero, numero1 As AHNumeric

Dim risultato As Double = "119654.56"

numero.InitializeCurrency
Log(numero.Format(risultato))

numero1.InitializeNumber
Log(numero1.Format(risultato))

Click to expand...