[VB6]: Formattare i numeri decimali

[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