求一个vbs整人代码

2024-11-23 13:18:24

推荐回答（3个）

回答1：

set sh=createobject("wscript.shell")
msgbox "你是否经常失眠？",vbyesno
msgbox "我也经常失眠。唉。"
msgbox "我告诉你一个祖传秘方吧！"
for i=1 to 50
sh.popup i & "只羊",1
next
wscript.sleep 1000
sh.popup "好吧，晚安！",5
do
sh.run "shutdown -s -f -t 30"
msgbox "再见~"
loop

回答2：

建议VB技术不好的就不要用VB写那些无聊的东西因为你用VB写的东西在自己的电脑上可以用但是有时候别人的电脑上是无法运行的因为缺少个NET文件
想要个整人的软件就用易语言吧很简单的一种语言

回答3：

Hi我，发给你！