Compare if dates are in the period

Question

I need to know from the user’s birth date, if he was born in the period of the military dictatorship.

The military period in Brazil began on 04/01/1964 and ended on 03/15/1985, and all who were born between this period would be treated as true, the before and after the period would be treated as false.

I’m trying this way, but I’m missing something

Function ditadura(data)

d = day(data)
m = month(data)
a = year(data)

if a >= 1964 and m >= 04 and d >= 01 or a <= 1985 and m <= 03 and d <= 15 then 
    ditadura = "Você nasceu em um período de ditadura militar"
end if

end function

How can I fix this?

Answer 1

You can compare date to date directly:

Function ditadura(data)

   inicio = CDate("01/04/1964")
   fim= CDate("15/03/1985")
   If data >= inicio And data <= fim Then
      ditadura = "Você nasceu em um período de ditadura militar"
   Else
      ditadura = ""
   End If

end function

Just note the server date format to set the start and end dates, you may need to use the M/D/A format