Biss,

Try this in the click event of the checkbox:

Private Sub Checkbox_Click()
If Me.Checkbox Then
Dim ctl As Control

For Each ctl In Me
If TypeOf ctl Is TextBox Or TypeOf ctl Is ComboBox Then
ctl.Enabled = False
End If
Next
Else
For Each ctl In Me
If TypeOf ctl Is TextBox Or TypeOf ctl Is ComboBox Then
ctl.Enabled = True
End If
Next
End If
End Sub

if you try to use the checkbox in combination with allowedits you'll see
that you can toggle the checkbox once and after that you cannot remove the
check anymore because edits aren't allowed.

the first option will disable the controls where the Else will enable the
controls again.

hth

--
Maurice Ausum


"Biss" wrote:

Thanks Maurice,

To tell you the truth I never new allow edits was a option, but it only
makes sense that it would be there

I would put this in the clic even or afterupdate event.

if me.chkenable then
me.allowedits=true
else
me.allowedits=false
end if

or do I have that backwards if I want to have the form read only when the
check box is checked?

Thanks again Maurice..

Bob

Que tenga buena noche.



"Maurice" wrote in message
...
Why would you want to disable all the fields if you lock them? Seems a bit
double but in this case you could go for the option to allow edits or not.
So in the click event of the checkbox you could set something like:

if me.chkEnable then
me.allowedits=true
me.allowadditions=true
else
me.allowedits=false
me.allowadditions=false
end if

etc.

or even tighter you could set the property of the form to read only..
hth
--
Maurice Ausum


"Biss" wrote:

Hi I am using MS 2007 and have a form that I would like to lock = yes and
enable = No on all fields..

I would like to do this by checking a check box.. I would also like to
have
the lock = no and enable = yes when I uncheck the check box..

Any ideas would be appreciated..

Many thanks in advance.

Bob