Bij aanvinken vakje automatisch date() invullen

[sis123]

Ik heb een formulier waar meerdere keren een activiteit moet worden afgepunt.
Daar men soms de datum op die lijst vergeet bij te vullen zou deze respectievelijk voor elk vinkje moeten verschijnen .

 

[Bartuls]

Onder het On Click event (bij klikken gebeurtenis) van het aanvink vakje de volgende code plaatsen:

If me.AanvinkVakje = True Then
me.DatumVeld = now()
End If