Ahemmm... c'è una funzione VB che lo fa... si chiama Format

Se non sbaglio la sintassi dovrebbe essere + o - questa:
codice:
dim i as integer
i=1
text1.text=format(i,"####")
Comunque scrivete format e ci schiacciate F1 sopra... :bubu:


ADDENDUM
Ahemmm... non avevo visto il post di Nico
Vado subito a fare Karakiri con le ginocchia sui sassolini ardenti