[VB6] Formattare in euro

[Pinco Pallino 2]

Salve ho lette alcuni post del forum ma non fanno al caso mio!

Io uso una stringa di questo tipo per approssimare alla seconda cifra decimale i miei valori:

IVA = Format(mioValore, "#.##")

tutto funzione ovvero se il risultato fosse: 12,123 me l'approssima a 12,12.

Il problema nasce se il risultato è tondo o cmq non alla seconda cifra (es: 12 o 13 o 13,9 ecc)

Perchè in quel caso non mi aggiunge le 2 cifre! Io invece vorrei una cosa del genere: 12,00 o 13.00 o 12,90

Spero di essermi spiegato bene!

Ho provato anke con:

IVA = Format(mioValore, "#.##0.00")

ma mi incasina tutti i risultati!

Help è urgentissimo! ^^
cia!

[mardok30]

Io ho usato:
Format(costoricetta.Text, "##,##0.00")
Ma a dire il vero non mi incasina nessun risultato(magari fammi qualche esempio)
Prova con FormatCurrency
Ciao

[buchwald]

Prova questo:

IVA = Format(mioValore, "0.#0")

Funzionerà. In bocca al lupo....

[LMondi]

Ciao Pinco Pallino 2,
devi fare attenzione ai punti ed alle virgole, così ottieni il risultato che cerchi (formatta con il punto delle migliaia ed arrotonda per eccesso o per difetto)

Private Sub Command1_Click()
Text2.Text = Format(Text1.Text, "#,##0.00")
End Sub

[XVincentX]

Per formattare in euro c'è l'apposita funzione
a = formatcurrency(valore,cifredopolavirgola)

[Pinco Pallino 2]

grazie a tutti del pronto intervento!
Vi spiego brevemente il problema ke è sorto ora!

Io modifico i risultati del tipo: 10,23 in 10.23

Perchè non se perchè ma Visual Basic vuole in punto e non la virgola per fare le operazioni decimali!

Lo script di Lmondi va benissimo. SOlo ke se per caso il risultato supera i 1000 mi da un cosa del genere:

1.400.30


dove un punto segna le migliaia e il secondo è la virgola (ke io con un replace cambio in punto per il motivo ke sopra ho citato).

Capirete ke con un cifra scritta in quel modo il programma impalla tutti i calcoli successivi!
Come si fa! (a me andrebbe bene anke 1400.30 senza il punto delle migliaia....se si può!)

[Robots]

E' così:
Format(CDbl(miovalore), "€ ##,##0.00")

[Pinco Pallino 2]

allora...funzionare funziona tutti!

Il problema è VB! Lui vede le virgole come se fossero punti delle migliaia e i punti come se fossero virgole!

Non so perchè, sarà lo standard inglese...

Il punto è che se io ottengo un risultato ke è:

1.000.00 euro oppure 1.000,00 euro (e li ottengo coi vostri scripts)

il VB mi vede quella cifra come 1 (inquanto il primo punto ovvero quello delle migliaia lo vede come virgola decimale!)

L'ideale sarebbe formattarlo così:

1000.00

è possibile?

[Robots]

allora usa la formattazione che ti ho mandato!!!!
a me funziona perfettamente

[Pinco Pallino 2]

A me anke la tua per i mille mi mette il punto! O.o

es: € 1.000