è la seconda volta che scrivo....
io ho fatto così (al lost focus)

Me.TXT_Importo.Text = Format(Me.TXT_Importo.Text, "###0.00")
purtroppo se scrivo 8,8 mi ritorna 88