Ruthie,
The form has an AllowEdits property. Set this to False in design view
Then, the code behind the cmd_Edit_Lock button can look like:
Private sub cmd_Edit_Lock_Click
if me.cmd_Edit_Lock.Caption = "&Edit" then
me.cmd_Edit_Lock.Caption = "&Lock"
me.AllowEdits = True
else
me.cmd_Edit_Lock.Caption = "&Edit"
me.AllowEdits = False
end if
end sub
HTH
Dale

Signature
Email address is not valid.
Please reply to newsgroup only.
> Hello,
>
[quoted text clipped - 7 lines]
> Thanks in advance,
> Ruth.
Pieter Wijnen - 12 Sep 2007 20:09 GMT
Note that this will lock all controls (even unbound ComboBoxes)
Pieter
> Ruthie,
>
[quoted text clipped - 31 lines]
>> Thanks in advance,
>> Ruth.