| 恶搞，vbs+bat实现随机位置无限弹窗 | 您所在的位置：网站首页 › 代码弹窗教学 › 恶搞，vbs+bat实现随机位置无限弹窗 |
恶搞，vbs+bat实现随机位置无限弹窗
|
闲来无事，写了个弹窗，分享给大家😊 效果先上效果 
还是很搞人心态的 代码 vbs首先是做基本的，每个弹窗的制作，这里使用的是inputbox，因为inputbox可以通过更改x,y轴的参数从而实现出现在指定位置的效果，代码如下 randomize a = int(rnd * 16000 +0) b = int(rnd * 8000 +0) X=inputbox("卡死你","virus","：）",a,b)randomize即为初始随机种子，用来生成随机位置的x,y轴 a = int(rnd * 16000 +0) b = int(rnd * 8000 +0)这两行就是定义变量，后面的数字指随机范围，如16000+0就是在16000到0之间的随机值赋值给a 可以根据自己屏幕的分辨率改动 接下来就是用来调用.bat的文件的vbs文件，代码如下 CreateObject("WScript.Shell").Run "cmd /c D:s.bat",0就这么简简单单的一行 他调用了同一个子文件目录下的另一个s.bat文件（待会会讲），并隐藏了运行的bat界面,否则只要关掉主运行界面，无限弹窗就会终结了 bat部分这里其实就是一个死循环，调用刚才在随机位置生成弹窗的vbs文件，代码如下 :A start a.vbs goto A就是用goto这个远古指令实现死循环，十分简单 教学代码讲了这么多，接下来教大家应用，我们新建三个txt文件，把上面3个代码依次复制进去，改成图中的文件名，一定不要错哦 
关于文件类型：txt把后缀名分别改为bat,vbs就行了 最重要的，记得把三个文件放在同一个文件夹内，点击b.vbs运行 作死小技巧如果你喜欢作死，可以给b.vbs创建一个快捷方式，把这个快捷方式剪切到下面这个路径里 C：\ProgramData\Microsoft\Windows\Start Menu\Programs\StartUp这样每次开机你都会得到一个无限弹窗了，是不是十分好用呢，用完过来感谢我吧！ 想说的话初中生写文章不易，看到的点个赞，点点关注 
|
【本文地址】
公司简介
联系我们