myDate = CDate(effdate.Text)
Text48.Text = DateAdd("y", 1, myDate)

This is the code to populate a second box with the date in one year from what was entered..But it is always one day ahead..
Like if you enter 10/10/00 it will come up with 10/11/01
I need it to be 10/10/01
Any further help?