06/08/21
Many years ago, I acquired some code to allow me to have the cursor start on my first line of my forms. Even though I have changed the lines to correspond with each form, for some reason, I can no longer get it to work.
The code is,

Private Sub Form_Current()
If DateofPurchase.NewRecord = True Then
DateofPurchase.DateofPurchase.SetFocus
End If
End Sub

Previously, this has worked fine. But I can no longer get it to work.  I also clicked Debug, Compile. Still it doesnt work.
What I want is for the cursor to appear on the first line of the form instead of where it was left on the previous entry entered by end user. Thanks.