lo mas facil que puede haber, solo declarate las variables como DATE y hace las operaciones que querras p.e:
Dim b As Date, a As Date
a = Date
b = Date - 60
Text1.Text = a - b
y a que el text te queda a 60
por si acaso, date te devuelve la fecha actualsi queres leer las fechas desde algo algo, entoces usa la funcion datevalue(string) y ya(a=datevalue(12 de marzo de 2004)p.e.)
o (a=datevalue(12/03/2004) etc) |