First,Thank you for your time, it is much appreciated.I have entered the code as you have suggested, but I get the messagebox no mater what date I enter. Is there something else that I am missing here? form1.#subform[0].ClientInfo1.DateOfBirth::exit - (FormCalc, client)var dateEntered = Date2Num(Da...