【VBScript恶搞代码】无限语音，数羊助眠！

前言👇

编写vbs脚本没有什么特定要求，只要有系统带了WSH环境就可以

千言万语汇成一句话，有手就行！

---

效果图👇

然后无限数羊……

而且任务栏里根本没有程序在运行，根本找不到在哪关闭

打开任务管理器都找不到，最后只能关机（不过文末还是会附上关闭方法的，非常简单）

---

操作步骤👇

①先打开记事本

win+R打开运行窗口，输入notepad，回车

②在记事本上粘贴下列内容

msgbox"点击确定我们一起数羊吧"
Set s = CreateObject("sapi.spvoice")
s.speak "既然你毅然决然地选择了开始，我们就开始数羊"
i=0
do
s.speak i & "只羊"
i=i+1
loop

③粘贴完成后点击文件→保存（或者Ctrl+S也一样）

注意保存的格式，这个特别重要！！！

点击保存后是这样的

我们需要把后缀名改成.vbs，其次把编码方式改成ANSI，点击保存即可

④保存后找到文件，双击打开即可，快去动手试试吧

---

补充说明👇

另外由于这里有一个loop无限循环

所以最后附上强制关闭的方法👇

Ctrl+Alt+Delete打开任务管理器→查看后台进程→右键→结束任务