Here is an example for you. The first sub calls the function IsRecord. The result is passed back in the IsRecord function. Hope this helps.
Private Sub Event_ID_BeforeUpdate(Cancel As Integer)
Dim CheckExistingRecord As Boolean
'HERE IS THE EXAMPLE
CheckExistingRecord =...
It would appear that the form has become corrupt. The coding is correct but it just doesn't run. The only solution is to recreate the form from scratch.
To avoid this problem in the future I would recommend frequent backups, especially if you are changing the database.
If a form becomes...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.