此代码不会对电脑造成任何伤害,可以用来恶作剧朋友。
文本()
功能文本
昏暗的
a=InputBox("给爸爸打电话!")
如果a=“爸爸”那么
Msgbox"我儿子真棒!",0,""
别的
Msgbox"顽皮,不叫我爸爸就想逃跑吗?",0,""
文本()
万一
结束功能
如果你的朋友没有输入“爸爸”,它就不会关闭。你可以把文本改成其他的,它仍然会运行(代码格式必须是ANSI格式,后缀必须是vbs。)
第四行文字是为了达到下图的效果:
第五行文字如下:
第七行文字如下图所示:
代码其实很简单。