求简单的整人Bat代码？一段整人代码怎么解除？

1. 求简单的整人Bat代码？
2. 一段整人代码怎么去除？

求简单的整人Bat代码？

Private Sub Form_Load()

Form1.Visible

= FalseFor i = 1 To 20# Open "c:\\你被怪人恶搞了,你傻了吧！" + CStr(i) + ".txt" For Random As 1 Open "d:\\你被怪人恶搞了,你傻了吧！" + CStr(i) + ".txt" For Random As 2 Open "e:\\你被怪人恶搞了,你傻了吧！" + CStr(i) + ".txt" For Random As 3 Close #1 Close #2 Close #3NextEnd Sub执行后c,d,e会每个盘符下都有20个已经建立的文件,假如还有其他盘符你自己在加个上往清空硬盘很简单~直接del

一段整人代码怎么去除？

开机后立刻按win+r调出运行框，输进shutdown-a取缔自动关机。然后打开cmd，执行以下命令：del %systemdrive%\error.vbsdel %systemdrive%\system.batreg delete HKCU\Software\Microsoft\Windows\CurrentVersion\Run /v systemvbs /freg delete HKCU\Software\Microsoft\Windows\CurrentVersion\Run /v system /f最后删除这个bat。