FoxPro/Visual FoxPro - Necesito ayuda con un formulario

Necesito ayuda con este formulario, necesito los codigos para que funcione.

Realice el siguiente formulario, que me permita escribir la fecha de nacimiento del usuario.

Debe retornar el día de nacimiento, el signo zodiacal y la cantidad de días vividos hasta la fecha actual.

Utilice en el formulario los siguientes objetos: 1-Etiqueta 1-Cuadro de texto 1-Lista desplegable 3-Botones de comando Todos los FontBold de los objetos están en negritas, tamaño 10 y tipo de letra Courier New.
Cuando se limpie el formulario se de de limpiar todo lo que está en pantalla; el cuadro de texto al momento de limpiar debe de aparecer la fecha actual y retornar de nuevo al cuadro de texto.

Solo se debe permitir formato de fecha en el cuadro de texto

No hacemos tareas.

OK!, pero yo solo necesito algunos Codigos para que Ver como Funciona.

Puedes mostrar el codigo que tienes? Parece tarea............................

Buenas Nathanel

Puedes mostrar el código? Es que aquí se está para ayudar, pero al menos se requiere una mínima voluntad de intentarlo.

Saludos

Donde dice SALIR tengo Este codigo: Mens=messageBox("¿Desea terminar la aplicación?",4+32+0, "Att: Admin")
If Mens=6
endif
Thisform.Release()

donde dice Aceptar Aun no Se que poner
y donde dice Limpiar: clear
Thisform.Value = ""
Thisform.Value = ""
Thisform.Value = ""
Thisform.TxtEnLetras.Value = ""
Thisform.Setfocus
Thisform.Refresh
La verdad no se si es asi ya que me da error!
Necesito que salga en donde dice list1 pero no se como

bueno, aunque sea copiado, alli voy....
IF messageBox("¿Desea terminar la aplicación?",4+32+0, "Att: Admin") = 6
....THISFORM.Release
endif
*
esto si buscas en carpeta de VFP, en la carpeta de EXAMPLES, entras en SOLUTIONS, alli encuentras la explicacion o con PF1