[VB6]: Formattare i numeri decimali

[marco.santilli]

Ho un calcolo:

Text93.Text = (Text95.Text / (1.0278 - (0.0278 * Text94.Text))

Il risultato vorrei che mi venga reisituito con una sola cifra decimale

Cosi scrivendo:

Text93.Text = Format((Text95.Text / (1.0278 - (0.0278 * Text94.Text))), 0)

mi da il numero intero sena virgola

Come va modificato????

Ciao e grazieeeeee

[LMondi]

Ciao Marco,
nel seguente modo avrai due e una cifra decimale, con separatore delle migliaia ed arrotondamento per eccesso/difetto:

Private Sub Command1_Click()
    ' Due cifre decimali:
    'Text1.Text = Format((1300 / 15), "#,##0.00")
    ' Una cifra decimale:
    Text1.Text = Format((1300 / 15), "#,##0.0")
End Sub

[marco.santilli]

Ok grazieeeeeeee

[Jupy64]

Ciao, per comodita' ci sono anche FormatNumber(numero, numeroDecimali) e FormatCurrency(numero, numeroDecimali)