VBA Date returns 1/1/1900 in one project only

[duggie33]

Sorry if this has been asked before, searching for it multiple ways returns all kind of unrelated results.

I have one VBA project that consistently returns 1/1/1900 for "Date". I could have two projects open, with Project A in focus, type ?date in the Immediate window and get a return of 8/10/2021, with Project B (for bad) in focus, type ?date and it returns 2 (1/1/1900). Is there a project specific setting, a reference, or something else that would cause this?

Background: using date picker by Trevor Eyre and would like the it to open and display this month (August 2021) rather than January 1900. It uses today's date to set the month showing on open.

Thanks,

Doug

 

[duggie33]

After copying over sheets, forms, and modules to a new file I have isolated when the "Date" issue arises. It works fine until I add one specific form. Without the form ?Date returns 8/11/2021. With the form imported, ?Date returns " 2 " like shown in original post.

Is there a form property that would cause this to happen? I have stared at them for a while and none seem like they would affect the Date function. Could the form be corrupt somehow causing this? Any ideas are welcome.

Thanks,

Doug

 

[RoryA]

Is the form actually loaded when this happens?

 

[duggie33]

No, while viewing the form (edit mode, View Object) and type ?Date in the Immediate window. If I remove the form from the project the ?Date shows correctly.

After a little more experimenting, I discovered that adding a blank form (not that specific form like I thought) I get the same problem. So I thought it might be an issue with having four forms. Tried a new file with four forms, works fine so it has to be something in this file.

 

[RoryA]

Hard to say without the file. The only thing I can think of would be some code that is actually altering the date, since you can't use date as the name of anything in your own code.

 

[duggie33]

I knew that and must have blanked when I created a Public Enum with "Date" as a member. I kept at deleting things one at a time to see if the issue went away after deleting Modules and that is when the issue disappeared. I knew immeditately that I did that...doh.

Thanks for taking the time to question it Rory!

As an aside, why doesn't Compiling recognize my mistake, using a reserved word? Why does it only cause an issue after having four forms in the project? Don't spend much time on these questions, my issue has been resolved. Thanks again.

Doug

 

[RoryA]

I don't know - the compiler should complain, but has always been a bit weak on Enums in my opinion. I have no clue why adding the last form made any difference though.