Scusami se non te l'ho detto prima non avevo VB6 sotto mano e non ricordavo il prototipo della funzione:
label3 = FormatNumber(numeroDaFormattare, 3)
Ciao