Report Offensive Message

This is close to LKJCPA recommentation.
Do an afterupdate event on the field in question setting the default value in the properties for the current new default value entered in form. It would stay the same value if nothing changes.

Quick and dirty code:
Private Sub Field1_AfterUpdate()
Dim txtDefault As String
txtDefault = Me.Field1.Value
Me.Field1.DefaultValue = Chr(34) & txtDefault & Chr(34)
End Sub