Access 2010：有没有办法创建受密码保护的表单/按钮？

Question

有没有办法在Access 2010中创建受密码保护的表单或按钮？

我试过这个（http://technologytraining.psu.edu/node/728）但是当我输入错误的密码时，它仍然有用。

有什么想法吗？

Answer 1

我设法解决了我的问题！ @HansUp感谢您的帮助！ 我没有启用控件。

  Private Sub MyButton_Click()
      Const cstrPassWord As String = "open"
      Dim strPassWord As String
      strPassWord = InputBox("Password:")
      If strPassWord = cstrPassWord Then
            Forms!Pharmacy.Form!pharmacy_warehouse_stock_Subform.Form!delete_query_button.Enabled = True

     Else
        MsgBox "Incorrect password."
     End If
  End Sub