更新时间2019-08-22 16:12:17
const title = "你爸爸是谁"
const yourname = "周杰伦"
const question = "你爸爸是谁?请在下方输入。"
const info = "你在说谎!不要逃避,接受现实吧,不然是关不掉的!嘻嘻!"
const scend = "看吧!我是你爸爸的事实你还是要承认不是。"
dim youranswer
do
youranswer = inputbox(question, title)
if youranswer <> yourname then msgbox info,
vbinformation+vbokonly, title
loop until youranswer = yourname
msgbox scend, vbinformation+vbkonly, title
你的程序有一个错,就是
if youranswer <> yourname then msgbox info,
vbinformation+vbokonly, title
它应该在一行内,也就是
if youranswer <> yourname then msgbox info,vbinformation+vbokonly, title
明显的没有基础直接抄别人程序的,个人观点,你这样只会浪费时间,什么都学不到的
这是啥没看懂你要问什么啊
中病毒了吧,赶紧杀毒了