以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于inputpassword  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=118856)

--  作者:lzw001
--  发布时间:2018/5/12 11:18:00
--  关于inputpassword
老师,这里,如果我输入密码不正确,可以返回,但是如果我点击了“取消”,那么这个设置密码就没有什么意义了。这个“取消”可以隐藏掉吗

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180512111712.png
图片点击可在新窗口打开查看


--  作者:有点蓝
--  发布时间:2018/5/12 11:39:00
--  
Dim pwd As String
If InputPassWord(pwd,"提示","请输入密码:") Then
    If  pwd <> "888"
        Messagebox.Show("您输入的密码不正确!")
        \'\'不正确的处理,返回,或者关闭项目
    Else
        \'\'正确的后续处理
    End If
Else
    Messagebox.Show("您输入的密码不正确!")
        \'\'不正确的处理,返回,或者关闭项目
End If

--  作者:lzw001
--  发布时间:2018/5/12 11:49:00
--  
好的,谢谢