Visual Basic - URGENTE: Formato fecha

Hola!
Necesito saber como dar a una caja de texto el formato fecha, osea que cuando vayas a escribir te ponga los separadores de fecha. He probado con dataformat, pero no me sale, asique hago algo mal o se hace con otra propiedad. Gracias.

Mejor utiliza los controles MonthView y DTPicker. Das click con el botón derecho del mouse en la barra donde están los controles y seleccionas componentes, luego busca Microsoft Windows Common Controls 2-6.0 y seleccionalo. Después de eso aparecerán los controles para manejo de fechas

Te diré como lo hago yo que empleo VB-5.
Si damos a la Caja de texto el nombre de 'entrada' en su lostfocus inserto el siguiente código:
entrada.text= format(entrada, "0#-0#-0#")
Con ésto, naturalmente el usuario no tiene que teclear los guiones de separación, sólo los dígitos.

Deseo que te sea útil. Adios.