VBA - lock all the controls on a form in one line of code

[maxwell2323]

I have a form with a lot of text boxes on it. When the form is first displayed to the user, I want to make sure he cannot type into any of them until a button is pressed. Can I use just one line of code to make sure all of these are locked? Or do I have to wrie a line of code for each one. I am in Access 2003. Thanks in advance.

 

[missinglinq]

Not one line, but you can do it for all controls like this. This will lock all con

To lock

Private Sub Form_Current()

Dim ctrl As Control

For Each ctrl In Me.Controls
  If TypeOf ctrl Is TextBox Then
   ctrl.Locked = True
  End If
Next

End Sub

to unlock

Private Sub UnlockButton_Click()

Dim ctrl As Control

For Each ctrl In Me.Controls
  If TypeOf ctrl Is TextBox Then
   ctrl.Locked = False
  End If
Next

End Sub

The Missinglinq

Richmond, Virginia

There's ALWAYS more than one way to skin a cat!

 

[Remou]

Have a look at the form properties:

AllowEdits
AllowDeletions
AllowAdditions

 

[Domino2]

You can also use the tag property to select certain controls you want in your roundup of controls to disable/enable

 

[maxwell2323]

Thanks to all...all your answers were valuable !