I'm not sure of exactly which controls you want to disable, so you
will have to adjust the logical test in the If statement, but this
should give you the idea (paste this code within the click event of a
button or trigger it as you want):

Private Sub CommandButton1_Click()
Dim c As Control
For Each c In Me.Controls
If c.Name = "Cntrl1" Then
c.Enabled = False
End If
Next
End Sub

Good luck,
Randy