vbs怎样让别人叫你爸爸、密码锁代码

这边直接给源码：

do

baba=inputbox("叫爸爸来关闭窗口，否则别想关掉")

if baba="爸爸" then

exit do 

else:

msgbox"快叫爸爸，重来！",64,"提示"

end if

loop

msgbox"哎，乖儿子！"

也可以把文字改一改，当密码锁用，这下解决了两个问题。