Dim passward,enterpw
do
enterpw = inputbox("请输入密码。")
constpassward = ("1234")
if enterpw=("1234") then
msgbox("认证成功，恭喜你！")

exit do '该句可退出vbs窗口.
else
msgbox("认证失败！")
end if
loop

上面这一段，输入密码的时候会显示出密码，那位大大帮忙改成输入密码的时候是星号的，谢谢。

inputbox  函数，不支持 星号输入。

如果你要显示星号，就不能使用 VBS ，要用 VB6 等编程语言写。

哦，我一窍不通，你能不能帮我一下？

可以使用文本框