Hi
I want to change the text format of a text box to numeric as (##,###.00).
It is very easy to do in the event of LostFocus, GotFocus etc.

But I want to do this in the event of text change. As I type a number it shoud be formatted properly.

I coded :
Code:
Private Sub TxtAmnt_Change()
TxtAmnt.Text = Format(Trim(TxtAmnt.Text), "#,###.00")
End Sub
But this doesn't work properly.
Any idea to solve this.

With regards,
Nasreen