I am a new user so the answer may be very simple. I have looked through the
various threads and haven't found this problem.

I have created a userform with a textbox for inputting a date. However,
when I launch the form and start entering the date it defaults to some wrong
date and will not allow me to enter the correct date. This seems pretty
strait forward but I cant seem to get my date input field to work properly.
Any suggestions?

This is the code I am using.

Private Sub Tb_Date_Change()

Tb_Date.Value = Format(Date,"dd-mmm-yyyy")

End Sub