How i prepare a Textbox for date input?

How i prepare a Textbox for date input?
I try using the format function:

Me.txtFechadeEntrada.MaxLength = 8
mascarafechaentrada = Format(Me.txtFechadeEntrada.Text, "##/##/##")

And on saveclick this ,I need save the data to a text file with a specific format I delete the /.

mascarafechaentrada = Format(Me.txtFechadeEntrada.Text, "######")
Me.txtFechadeEntrada.MaxLength = 6

But don't work because the user can type this 11112//2.

My last choice is to use date picker control or textbox=format (Date,yy/mm/dd).
But I prefer the user to type the date in the text box.
Sorry for my English
Any help is very appreciated

You may want to use the mask edit box

The maskeditbox is another control like the date picker. I looking for a way to use a text box.

You know a way to use a maskedit in a text box?
Thanks for answer anyway

Use a HIDDEN TextBox to format items.

Ok let try that .
I will post