Access - Consulta de Fechas

 
Vista:
sin imagen de perfil

Consulta de Fechas

Publicado por Germán (7 intervenciones) el 19/09/2013 17:47:48
Buen día,

Tenemos un formulario en donde se toman los datos de encuestas de personas con alguna condición especial, Uno de los requisitos principales es validar que la fecha en que se realiza la encuesta corresponda al mismo año en que se se está procesando la información (en éste caso particular 2013); tenemos el siguiente código que además de parecerme "Poco elegante", no se ejecuta acorde a lo planteado:

Dim h

h = (Me.FechaEncuesta.value - Me.FechaSistema.value)/365

si h <= -1
MsgBox " El año de la encuesta NO corresponde al año en curso")
end if

Les agradezco sus aportes

Muchas gracias


Germán Gutiérrez
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Consulta de Fechas

Publicado por jose (830 intervenciones) el 19/09/2013 21:31:44
1
2
3
4
5
6
7
8
h =year(Me.FechaEncuesta.value) -  year(Me.FechaSistema.value)
 
otros ejemplos:
year(now())     nos da el  año de la fecha del sistema
 
dia3 = Format(Day(Now() - 365), "00")
MES3 = Format(Month(Now() - 365), "00")
an3 = Year(Now() - 365)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar