Private variable is not accepting date value

[pewilson]

I'm not sure if anyone has come across this problem, but in my Property Let in my class module is not accepting the date value that Im passing from the form.

'Class Module

Private mvarControlDate as Date 'Declaring private variable

-----------------------------------------------------------
Public Property Let ControlDate (ByVal vData as Date)
mvarControlDate = vData
End Property
-----------------------------------------------------------

The vdata = 4/19/02
The mvarControlDate = 12:00:00 AM

When I run a break on property let ControlDate and I hoover over the values inside the property this is what I get. The vdata is correct, but mvarControlDate is incorrect and the main problem. When I view the record in the database it is saving it as 12/30/1899 which is telling me that is not passing a value through the module correctly.

Im not sure why mvarControlDate is showing 12:00:00 AM when I declared it as a date. I've been working on this for the last 3 days and I'm getting frustrated. If anyone explain why this happening I would be greatly appreciate the help.

Thank you.

Paul
paul_wilson74@hotmail.com

 

[JustinEzequiel]

an uninitialized date variable will have a value of '12/30/1899 12:00:00 AM'

obj.ControlDate = dateVal

 

[pewilson]

It works fine now....Thank you very much! Paul
paul_wilson74@hotmail.com