If you want to lock certain buttons inside the form, you can use (InputBoxDK) which is enough for that. I use it in most programs.
Private Sub Option8_BeforeUpdate(Cancel As Integer)
If Me.Option8 Then
Me.Button name.Enabled = False
ElseIf InputBoxDK("Enter the password to unblock the print...