<div>
CDate(&quot;4-4-1929&quot;)<br />
<br />
returns<br />
04-04-1929 <br />
<br />
mx
</div>


<div>
What version off Access?<br />
<br />
AFAIK, This is a machine setting, not an Access setting. It is part of the Regional settings.<br />
<br />
<br />

</div>


<div>
You can try this also:<br />
<br />
DateSerial (Year([YourDate]),month([Y<wbr />ourDate]),<wbr />day([YourD<wbr />ate]))<br />
<br />
mx
</div>


<div>
You could knock the date into a Split array and then handle it exactly the way you want.<br />
<br />
Dim MyFinalDate as Date<br />
Dim TheYear as integer<br />
Dim TheMonth as integer<br />
Dim TheDay as integer<br />
<br />
'split the date using the split function<br />
Dim DateSplit() as string 'an array to hold the date elements<br />
DateSplit = Split(&quot;4-4-29&quot;, &quot;-&quot;) &nbsp;'--&gt; throw in a variable or whatever instead of 4-4-29<br />
TheDay = CInt(DateSplit(0)) 'coerce the day string to integer <br />
TheMonth=CInt(DateSplit(1)<wbr />) 'coerce the month string to integer <br />
'test the year, between 0 and 12, pre-pend '20', else pre-pend '19' then coerce to intger<br />
TheYear= &nbsp;CInt(IIf(CInt(DateSplit(2)<wbr />) &gt;&nbsp;0 and &nbsp;CInt(DateSplit(2)) &lt;13, CInt(&quot;20&quot; &amp;&nbsp;DateSplit(2)), CInt(&quot;19&quot; &amp;&nbsp;DateSplit(2))))<br />
<br />
'now knock it together in a bullet-proof way<br />
MyFinalDate=DateSerial (Year(TheYear),month(TheMo<wbr />nth),day(T<wbr />heDay))<br />

</div>


<div>
<div class="content wysiwyg-content">
I have DOB text field that's formatted mm-dd-yy, I need to convert the text into a valid date field, however in the case where the yy is &lt;&nbsp;= 30 (1930) it returns a 2030. &nbsp; How can set my cutoff year to say 2012?
</div>
</div>


I have DOB text field that's formatted mm-dd-yy, I need to convert the text into a valid date field, however in the case where the yy is < = 30 (1930) it returns a 2030.   How can set my cutoff year to say 2012?

Changing cut off date on Access

Microsoft Access is a rapid application development (RAD) relational database tool. Access can be used for both desktop and web-based applications, and uses VBA (Visual Basic for Applications) as its coding language.