密码打开窗体怎么实现？

大漠水手　发表于：2014-01-24 09:29:41 　

复制

我做了个系统，其中做了一个窗体，窗体中创建了按钮，我想实现这样一个功能，点击按钮出现一个带密码的对话框和两个按钮（是确定和取消按钮），当输入正确密码后点击确定进入其他窗体，这个怎么实现，要简单的例子。谢谢大家！！

Top

chinasa 发表于：2014-01-24 10:15:43

http://www.accessoft.com/article-show.asp?id=2743

Top

大漠水手发表于：2014-01-24 10:30:01

实例中密码打不开

Top

落尘_小新发表于：2014-01-24 11:25:18

在按钮单击事件中写入如下一行代码就是最简单的了

If InputBox("请输入密码：") = "事先设定的密码" Then DoCmd.OpenForm "要打开的窗体"

Top

麥田发表于：2014-01-26 13:08:05

[示例]通过按钮打开程序之前提示输入密码\加密表\对表加密的一种方法[Access软件网]
http://www.accessoft.com/article-show.asp?id=3772

Top

麥田发表于：2014-01-26 13:08:40

【Access源码示例】输入密码才能有权限编辑数据,用密码控制新增修改数据的示例[Access软件网]
http://www.accessoft.com/article-show.asp?id=8142

Top

大漠水手发表于：2014-01-27 17:09:20

我使用了4楼的方法做了个按钮密码登陆窗体，可是我想让密码掩码怎么做呢？

代码如下：

Private Sub Command0_Click()

Dim a As String

a = InputBox("请输入密码", "提示""密码inputbox")
If a = "123" Then
MsgBox "芝麻开门!", vbInformation, "提示："
DoCmd.OpenForm "数据查询"

Else
MsgBox "密码不正确！你不能使用这个按钮！"
End If
End Sub

请帮忙解决一下

Top

剑与星发表于：2014-01-27 22:14:51

设置一下文本框的格式属性就可以了吧

Top

大漠水手发表于：2014-01-27 23:12:29

他的那个没有文本框

Top

总记录：8篇页次：1/1 9 1 :

Access交流中心

密码打开窗体怎么实现？