vbMonday and prompt for date comparison help

[pepper42 via AccessMonster.com]

I need help with the vbweekday function and got/lost focus function on a form.
I have a form that has two fields that I need to work with when the user
clicks on a button to duplicate the previous record. Everything is working
fine except for this functionality that I can't figure out.

Form Name - subfrm_Status_Internal

WeeklyStatus_Date
This field should always equal a Monday. I know how to get the date if the
current date is a Monday, but I need to know how to have the code always look
for the next Monday and default the field to that date. I currently default
it to Monday manually at the table level.

Last_Updated
This field defaults to the WeeklyStatus_Date value. After Update the user is
prompted if the Last_Updated date is the same as the WeeklyStatus_Date. If
yes, then record is saved (this i have working). If no, then the Last_Updated
date needs to get focus, clear out any value for the user to type in the
correct date.

I hope that this is enough information for someone to help.

 

[pepper42 via AccessMonster.com]

Nevermind - I found a work-around. Not optimal, but I guess it will work.