American/European date format issue

[dantnz]

Sorry, I know this is most likely an easy fix, but nothing that I have tried has worked so far, and after some searching I can't seem to find the solution.
I have a datasheet form that has the date from the previous record as default for a new record. Currently when I go to create a new record it changes the date from european to american (eg. if the previous date was 11 april this will change to 4 nov due to the differences in date formats. How can I fix this? thanks

The code:

Private Sub applDate_AfterUpdate()

If Not IsNull(Me.applDate.Value) Then
applDate.DefaultValue = "#" & Me.applDate & "#"
End If

End Sub

[RuralGuy]

How is your Regional settings configured for date at the Windows7 level?

[dantnz]

Windows 7 settings are configured correctly, I read somewhere that when the ## are used for date stuff that access does the american format regardless, so i think i somehow have to use DateValue() instead, but i'm not quite sure how i would do that?