vbs整人代码（用VBScript编写整人代码）

最佳答案用VBScript编写整人代码 小标题1：制造滑稽窗口 VBScript可以通过WScript对象创建一个窗口，让用户感到突然的滑稽和不舒服，这种方式是利用窗口永久闪动的方式实现的。 代码示例：...

用VBScript编写整人代码

小标题1：制造滑稽窗口

VBScript可以通过WScript对象创建一个窗口，让用户感到突然的滑稽和不舒服，这种方式是利用窗口永久闪动的方式实现的。 代码示例： ```vb SetobjShell=WScript.CreateObject(\"WScript.Shell\") Fori=1To100 objShell.Popup\"此电脑已经被黑客攻击\",1,\"病毒警告\",0+16+4096 objShell.Popup\"微信金融卡被盗刷，账户准备被清空，请尽快申诉\",1,\"团队检测\",0+16+4096 Next ``` 该代码段实现的效果是，每秒钟弹出一个窗口，并且随机的弹出不同的消息，给用户不断的心理压力。

小标题2：禁用键盘和鼠标

VBScript可以通过键盘和鼠标输入抓取等技术来实现禁用，例如可以通过： ```vb SetobjShell=WScript.CreateObject(\"WScript.Shell\") objShell.run\"taskkill/f/imexplorer.exe\" ``` 将资源管理器全部关闭，实现禁用所有按键和鼠标操作。

小标题3：显示无限警告框

VBScript可以通过递归调用自身的方式显示无限警告框。 代码示例： ```vb SetobjShell=WScript.CreateObject(\"WScript.Shell\") objShell.Popup\"有人入侵你的计算机，要立即关机！\",1,\"警告\",0+16+4096 DoWhileTrue objShell.Popup\"警告！\",1,\"警告\",0+16+4096 DoEvents Loop ``` 该代码段实现的效果是，首先弹出一个警告框，然后无限弹出警告框，直到关机为止。 以上是VBScript整人代码的三个示例，希望读者不要用于恶意用途，否则后果自负。