Problema con fechas

[occam25]

Para poder usar las funciones Day, Month, Year.. etc el parametro q le pasas ha de ser tipo Date.

Tendras que crear una variable de ese tipo:

Dim fecha As Date

fecha = CDate(Text1.Text) ' convertira string en date

Ahora si te funcionara Day(fecha), Month(fecha) y Year(fecha) y ya podras hacer los calculos de forma sencilla.

El problema de esto es q si metes la fecha mal el programa fallara al intentar convertir el string en date.

Yo que tu usaba un calendario (MonthView), es mas elegante y no da cabida a fallos de formato.


Suerte