Age validation

[Rhymeo]

Hello!

I'm really new to Access and need help with a validation rule

Right, i have a 'Date of Birth' field and what would the validation rule be if i only want people over the age of 12 to be able to go any further?

I've tried various other rules found online but some just don't work...

Any help would be great!

Thanks

 

[MStCyr]

I saw an example of that in this forum just a day or so ago. Do a search in the forum.

 

[boblarson]

This is if you are filling out a form and want to stop it there. Put it on the Form's Before Update event.

Dim intAge As Integer
intAge = DateDiff("yyyy", CDate(Me.txtDOB), Date)

If intAge < 12 Then
MsgBox "Sorry, this person is not 12, or older.", vbExclamation, "Under Age"

Cancel = True
Me.Undo

End If

 

[Rhymeo]

Right, i'll try that now

I've searched the forums but they generally concern other stuff related to ages, not helping too much

 

[RuralGuy]

If you wish to account for the birthday this year then use:

intAge = DateDiff("yyyy", DOB, Date) + (Date < DateSerial(Year(Date), Month(DOB), Day(DOB)))