一个简单的VBS脚本实现同时弹出多个弹窗

以下为VBS脚本代码：

 

On Error Resume Next
dim i
set ws = wscript.createobject("wscript.shell")
for i=1 to 10
 ws.run"mshta vbscript:msgbox(""13456"")(window.close)",vhide
next

其中for i=1 to 10是同时弹出的弹窗的数量，这里为10个，大家可以自行改动，

脚本运行效果如下：