Exiting the find dialogue Box

[shaz123]

After a record has been found is it possible ot exit a the Find dialogue box and return to the form, wihitn the follwing code below?

"Private Sub findrecord_Click()
On Error GoTo Err_findrecord_Click

Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70

Exit_findrecord_Click:
Exit Sub

Err_findrecord_Click:
MsgBox Err.Description
Resume Exit_findrecord_Click

End Sub"