vbs怎么大量弹出窗口？？？

1、首先启动计算器，在桌面右键，选中“文件文档”。

2、生成之后，双击打开文件文档。，然后输入如图的代码。

3、输入完毕后，保存起来。

4、然后对文件进行右键，重命名，将txt的后缀，改为vbs格式。

5、然后双击打开，就可以看见其效果了。这里是关不了的。（ctrl+alt+delete可以停止下来）

6、或者打开任务管理器，将一个wscript的进程，选中，结束进程即可。

7、完成效果图。

1.预先写一个vbs，命名为*.vbs,*为你想要改的名字
*.vbs内容为
Msgbox"内容"
此vbs内容为
Dim Wsh
Set Wsh=CreateObject
For i=0 to 9999
Wsh.Run"*.vbs"
Wscript.Sleep 100'延迟，可以修改，此处为100毫秒
Next
2.递归 无限弹
弹出窗口前运行自身,将此文件命名为*.vbs
Dim Wsh
Set Wsh=CreateObject
Wscript.Sleep 100
Wsh.Run"*.vbs"
Msgbox"内容"

可以创建1万个wscript.exe进程，每个wscript.exe弹出一个窗……

do
createobject("wscript.shell").run "notepad.exe"
loop

无限调用自身，就是一个递归