Edit button on form?

[Xterra14s]

I have a form that needs to display patient information that is locked to edits to keep anything from being changed in this section by accident. If the end user wants to update the patient phone number or address I want an edit button that will unlock the subform. Any way to do this? I tried the following with no luck



Open the form in design view.
Activate the Event tab of the Property Sheet.
Select [Event Procedure] from the dropdown in the On Current event.
Click the builder buttons ... to the right of the dropdown arrow.
Make the code look like this:

Private Sub Form_Current()
Me.AllowEdits = Not Me.NewRecord
End Sub

This will disable editing when the user loads an existing record, New records can still be created and edited.
Switch back to the form in Access.
Place a command button on the form. Make sure that the command button is selected.
Activate the Format tab of the Property Sheet and set the Caption property to Edit Record or whatever you prefer.
Activate the Other tab of the Property Sheet and set the Name property to cmdEdit.
Activate the Event tab of the Property Sheet.
Select [Event Procedure] from the On Click event, then click the builder buttons ...
Make the code look like this:



Private Sub cmdEdit_Click()
Me.AllowEdits = True
End Sub

[RuralGuy]

You do realize you will get a Current Event *every* time you switch to a different record, right?

[Micron]

Consider setting the Enabled property of the controls to False on open and True on button click. You only mentioned a couple of controls, so maybe you'd need a more robust procedure if there are a lot of them that need to be cycled. For this I'd use a procedure that reads a tag for those controls (see property sheet Tag property) and cycle through the form controls collection. You probably would want to reverse the enabled property after some sort of event, but you didn't indicate that was desired.

Usually, locking controls keeps lower level users from editing certain fields, but I don't see any indicator that security is coming into play, so does it make sense to introduce an unlocking step if just anyone can invoke it?