Refreshing or requerying a continuous form when returning to it.

I have a continuous form with a button that opens a form to edit data in the selected record.
My VBA code works find until I split the database. After splitting the database, it will not do the requery.
How do I refresh the recordset in the continuous form whenever I come back to it.

The following is my VBA code

Option Compare Database
Dim doaquery As Boolean


Private Sub Findbtn_Click()
Me.Requery
End Sub

Private Sub Form_Current()

Me.Requery
End Sub

Private Sub Lookupbtn_Click()
  DoCmd.OpenForm "LongTermVehiclesF", , , "VehicleID=" & Me!VehicleID
  doaquery = True
  
End Sub

Private Sub Lookupbtn_GotFocus()

    If doaquery Then Me.Requery
    doaquery = False
End Sub