- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- InputValue弹出窗口的几个问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=178400)
-- 发布时间：2022/7/3 9:25:00
-- InputValue弹出窗口的几个问题
此主题相关图片如下：提示.png
Dim Val As Integer
InputValue(Val, "提示","请输入密码!") \'输入数值
If Val = "888" Then \'开发者才能打开开发设计器
MessageBox.Show("密码正确!","提示")
Else
MessageBox.Show("密码不正确!","提示")
End If
上述代码只要密码不正确,不管是按取消还是直接关闭弹窗口都会显示密码不正确,几个问题请教
1 如何获取弹窗中的取消或者确定按钮,也就是如果按取消就关闭窗口但不提示密码不正确的提示
2 弹窗的输入栏如果想要显示为掩码可以吗?即输入密码时每输入一个字符都显示为*号
谢谢
-- 发布时间：2022/7/3 20:34:00
--
1、http://www.foxtable.com/webhelp/topics/2063.htm
InputValue会返回一个逻辑值，如果用户在对话框中单击的是确定按钮，则返回True，否则返回False。
-- 发布时间：2022/7/4 21:43:00
--
类型不符吧，如果一定要用这个，类型一致就可以了
Dim Val As String