Abilita o disabilita tutti i controlli form

'In your visual basic project, insert the following code

'into a module:

Sub EnableAll(Enabled As Boolean, ParamArray objs() _
As Variant)
Dim obj As Variant
For Each obj In objs
obj.Enabled = Enabled
Next obj
End Sub