Just as an example....
If you have field A and field B, A being the date field and named txtA,
field B is named txtB. Use the following code added to the AfterUpdate
event for B:
Private Sub txtB()
Me.txtA = Date
End Sub
Once you have added details to field B and pressed enter or clicked on
another field, field A will display and record the current date.