Question

vba中有没其他类似inputbox的函数，inputbox文本框里的字符没有办法用*代替，有没有别的可起到这个效果

vba中有没其他类似inputbox这样的函数，inputbox文本框里的字符没有办法用*代替，有没有别的可起到这个效果

Answer 1

没看懂……
你想要干什么？通配符查找吗？
比如a=inputbox("~~~")
那么结果比较的时候
可以用
if [a1] like a
这样来比较行了？
或者我理解错了，请追问

追问

Sub aa()
a = InputBox("请输入密码.", "密码")
If a = "q123" Then
.....
End If
End Sub

如上我是想做一个简单密码控件，可是在inputbox的文本框中输入的q123我想用一串*代替显示，可是inputbox似乎无法实现

追答

那就直接用窗体了，画一个文本框
然后在加载事件中加一句
TextBox1.PasswordChar = "*"

或者直接设置它的PasswordChar属性为*