convert string to date

[derrick]

i have a text box with the following string 700131-0009.
i only want to use the first six digits before the dash(-
). Where 70 represents the year 1970, 01 means the month
(Jan) and 31 the day. i want that when the user types a
string like this (700131-0009), the first six digits are
converted to the persons date of birth such as 1970 Jan
31. Also another text box that converts 1970 Jan 31 to
the persons age.

txtbox1=700131-0009; txtbox2 = 1970 Jan 31; txtbox3= 33

 

[Wayne Morgan]

For the second textbox, a formula such as this should work.

=Format(DateSerial(Left(txtTextbox1,2),Mid(txtTextbox1,3,2),Right(txtTextbox
1,2)),"yyyy mmm dd")

To calculate age, you will find some examples here.
http://www.mvps.org/access/datetime/date0001.htm