以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何让一个按钮事件在输入口令之后才执行  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=43528)

--  作者:jimyoar
--  发布时间:2013/12/9 16:06:00
--  [求助]如何让一个按钮事件在输入口令之后才执行

数据库有些数据是比较敏感,我想在窗口里面做一默认隐藏了的文本,通过一个按钮,按下之后需要先输入口令,口令正确才执行让文本显示的代码。

不知能否实现这样的功能?


--  作者:Bin
--  发布时间:2013/12/9 16:10:00
--  
呵呵,当然可以啊.

把文本框设置为隐藏的. 点击按钮弹出一个输入框 输入正确的密码再把文本框设置为可视即可



Dim Val As string
If InputValue(Val, 
"密码""请输入密码:"
) Then
    if Val="123" then
     e.form.controls("TextBox1").visible=true
    end if
End If

--  作者:jimyoar
--  发布时间:2013/12/9 16:17:00
--  
谢大神~~~~