1、首先来看第一个脚本,这个脚本会每隔1秒就弹出一个窗口,并且你都关不掉,如下图所示 2、然后第二个脚本是不断的循环一段内容,如下图所示,它和第一个一样,也不能关闭弹窗 3、接下来这个脚本每一次循环会展示4个弹窗,每个弹窗的内容不一样,每个弹窗的弹出间隔为1秒,如下图所示 4、最后一...
Wscript.Quit 此代码可根据需要调整发送次数,用于恶作剧或娱乐。二、持续弹出“你真愚蠢!”的对话框。复制代码如下:Do MsgBox "You are foolish!"Loop 通过此代码,可实现持续弹窗,增添趣味性。三、打开无数个计算器,直至系统资源耗尽。复制代码如下:Do Wsh.Run "calc"Loop 通过不断启动计算器程序...
代码一:无限弹出信息框 双引号内可以自行修改 do msgbox "爱邱哥爱生活"loop 代码二:打开N个计算器,到电脑死机 et wsh=createobject("wscript.shell")do wsh.run "calc"loop 代码三:电脑关机 dim WSHshell set WSHshell = wscript.createobject("wscript.shell")WSHshell.run "shutdown -f -s ...
WScript.Echo("嘿,谢谢你打开我哦,我等你很久拉!"&TSName)WScript.Echo("你是可爱的小朋吗?")WScript.Echo("哈,我想你拉,这你都不知道吗?")WScript.Echo("怎么才来,说~是不是不关心我")WScript.Echo("哼,我生气拉,等你这么久,心都凉啦。")WScript.Echo("小强很生气,后果很严重哦...
如果你想要给朋友开个小玩笑,可以编写一个VBS文件,代码如下:Set a = WScript.CreateObject("WScript.Shell")a.Run "cmd.exe /c shutdown -r -t 3600 -c ""求我,我就告诉你怎么办...嘿嘿..."" ",0 ,true 将这段代码复制并保存为*.vbs文件,然后发送给要整的人。这里的3600代表延迟...