算法注册机编写扫盲---第五课
原创作者:我要[DFCG]
=================================================================================

注:接第四课,我又来了,这次想多余话都没有了。来!接着来吧。 ^_^

这个课程一共写 了五课,总算可以做一个总结或叫完结了!怎么, 意尤未尽?没法,我要[DFCG]菜的不行的,只是将一些个人的所谓经验或心得拿来献丑而已, 装酷了啊!砖头,烂柿子,臭鸡蛋一起掷过来了吧!先别啊,我还得说完再走的,你别赶我行不行了,我晕~~~~~~~~~
=================================================================================

一、到这里,应该说些什么内容呢?真的有点晕,以中级的来看,该说的都 好象说了吧!还有什么好说的,想想~~~

二、给些学习的方法吧!多试多练 不就是了?还有说头的吗?有,还是坐下来看完这第五课吧!

三、学着 自已编写一个属于你的程式,看下面源码:

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.ForeColor = &HFF0000
Label1.FontSize = 9
Label2.ForeColor = &HFF0000
Label2.FontSize = 9
End Sub

Private Sub label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.FontSize = 10
Label1.ForeColor = &HC0&
End Sub

Private Sub label2_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label2.FontSize = 10
Label2.ForeColor = &HC0&
End Sub

Private Sub label1_Click()
ShellExecute 0, "open", "http://218.63.244.68:1010/ckkd/index.php", vbNullString, vbNullString, 0
End Sub

Private Sub label2_Click()
      ShellExecute 0, "open", "http://dfcg.con.cn/", vbNullString, vbNullString, 0
End Sub

四、上面的词句,如果你对网页制作有那丁点认识也会看得明白的,看不懂?没事,复制到 粘帖你总不至于也不会吧!好,因为网上有不小好的源码,所以这次我先上源码再接着说整个的框架。在源码里看,晕晕的不知所其言,关键你要看着源码要写出一个可执行的程式来,我作几个引点解释:

Private Sub label1_Click() ← 这label1是?知道它就可应用源码自如了
ShellExecute 0, "open", "http://218.63.244.68:1010/ckkd/index.php", vbNullString, vbNullString, 0
End Sub

Private Sub label2_Click() ← 工具箱(左边竖框)有个大写字母A,就是它
      ShellExecute 0, "open", "http://dfcg.con.cn/", vbNullString, vbNullString, 0
End Sub

五、现在你打开VB6,新建一个执行文件模板,好,光标点一下上面说的大写A字母,然后回到模板上拉出一个框条来,呵,里面你看到的是什么,“label1”要的就是它,因为源码是这样写的啊! ^_^

六、重复第五步,你又拉出了一个“label2”来,够了,源码就这2个,以后你可以用这个源码去制作更多的链接。这例用2个就行多了就等于是违反源码原意,哈,你一定没好果子吃了。

七、现在到属性窗口,就是右边的中间框。滚动下 拉找到“Caption”,往右看看,label1放在那里了,知道怎样去做了吧!对,改写它,让它显示你所要的信息,以这个源码为例,这里改写为“DFCG官方论坛”,回模板看看,已经改写好了,光标放label2,同样的操作,改写为“DFCG短域名”。嗯,差不多要成功了,你现在用你的审美眼光,去布置好你的模板,加图片啊,改模板外观啊什么的,别急, 慢着来,你一定会设计出一个好看的外观来的。

八、最后用上面方法,再多拉出一个label3来,有用吗?有,这个你可以写上你想写的东西上去,比如,“我爱你,DFCG!” ^_^

九、好,现在你就要将源码用复制粘贴的方法,将原码导入模板,不会做这步?哦,读书不用功,回头由第一课开始再看吧!

十、嗯!都做好了,坐下来, 抽杆烟。对,我每一步都 做对的,那等什么,来啊,点工具栏,文件 → 下拉菜单点“生成工程1.exe”。当,出来了一个叫工程1的可执行文件,双击运行它看看,哈,你的设计完美吧?不管了,点一下上面的“DFCG官方论坛”,哦,打开的网页就是DFCG官方论坛,再点“DFCG短域名”,打开的也是DFCG官方论坛。成功了,这就是成功了啊,以后你只要将链接的地址改成你想去的就行。 &_^

十一、我说老大,我一个是网址一个是邮箱你这个就不行了吧? 对哦,怎么改写源码达到目的呢?嘿嘿,我先喝杯茶。来了,看下面:

Private Sub label1_Click()
ShellExecute 0, "open", "http://218.63.244.68:1010/ckkd/index.php", vbNullString, vbNullString, 0
End Sub

Private Sub label2_Click()
ShellExecute 0, "open", "mailto:bobyhua@163.com", vbNullString, vbNullString, 0
End Sub

十二、哦,明白了,改的也不多嘛,卖什么关子啊,砖头,烂柿子,臭鸡蛋~~~~~~

十三、你确认成功地生成你想要的可执行文件了吧!接着来,再来 个好玩的东 东。不行,我还没做出来啊,晕,回头重做,反正我是成功了,不信?我传2个上来你玩玩。 ^_^

十四、继续,还是 用反式方法来教,因为你已经是中级的了,看下面源码:

Dim a As String
Dim t As String
      Dim b As Integer
      Dim I As Integer
Private Sub Command1_Click()
CheckAgain
End Sub
Private Sub Form_Load()
CheckAgain
End Sub
Private Sub Timer1_Timer()
t = Left(a, b)
Form1.Caption = t
b = b + 1
If b > I Then b = 0
End Sub
Sub CheckAgain()
a = Text1.Text
I = Len(a)
      b = 0
End Sub

十五、左看看右看看,明白了,这个东 东只需要用一个按钮Command1, 一个控件Timer1,再就是一个文本框Text1,看不出来?回去看我前面的课程去。下面就动手去应用一下这个 源码吧!

十六、现在你打开VB6,新建一个执行文件模板,好,光标点一下“TextBox”,然后回到模板上拉出一个文本框Text1,再次到工具箱,点一下“CommandButton”, 并回到模板上拉出一个按钮Command1,还是同样的方式, 放入控件Timer1。好,现在这个框架就行了,你就得又用上你的审美眼光,设计一个你高兴我满意的 外见来吧!(按钮Command1可改名为“重新扫描”)

十七、现在到属性窗口,就是右边的中间框。滚动下 拉找到“Text”,嗯,“我要”说过的,这里可以改成想要的信息,好,我就写上“我爱DFCG,DFCG是我家!”。有点肉麻~~~ 别啊,谁的鞋子飞过来了~~~~

十八、现在你就要将源码用复制粘贴的方法,将原码导入模板,还是不会做这步?哦,学生不用功,老师之罪过了!不过你 好象应该从头开始学啊?!想想还是你的错,嘿嘿! @_@

十九、来啊,点工具栏,文件 → 下拉菜单点“生成工程1.exe”。得,出来一个工程1的可执行文件,双击运行它看看,执行文件的标题栏里的文字是流动的,爽~~~~,看到“我爱DFCG,DFCG是我家!”的字眼,有点亲切感了~~~~~

二十、我踢,我不要看这个,我想看的就要“踢一下我要爽 爽 ^_^”这个信息, 不是吧,这都行啊,没法,教到这步了,我不说你也会了吧,文本框写上“踢一下我要爽 爽 ^_^”,点一下按钮,这下你成了,不过我在哭你知道吗?因为 你在踢老师啊! &_&

二十一、还要不要,我 的网名叫“我要”,那好,再来一个源码,不过只是源码,你自己去做出一个可执行文件看看就知道是什么东 东来的了。权当复习吧!看下面:

Private Sub Command1_Click()
GotoVal = Me.Height / 2
For Gointo = 1 To GotoVal
      DoEvents
          Me.Height = Me.Height - 10
          If Me.Height <= 11 Then GoTo horiz
      Next Gointo
horiz:
     Me.Height = 30
      GotoVal = Me.Width / 2
      For Gointo = 1 To GotoVal
DoEvents
          Me.Width = Me.Width - 10
          If Me.Width <= 11 Then End
      Next Gointo
End
End Sub

二十二、好了,总算 写完五课了!前段时间是由于内部问题及年关私事加一起,忙个不可开交,现在论坛 重架成功,春节也过去。时间有点松动就赶紧写完这第五课,累啊,兄弟们,此文结束时,我要[DFCG]在此请大家以后多多支持DFCG,在网路上宣传一下DFCG,就是对我等老 莱的最好回报了! ^_^

二十二、本篇原创作者--我要[DFCG],版权没有,人权我有, 所以凡转此帖的友站及各路朋友兄弟们,必注明此文出自DFCG组织及我要[DFCG]原创为先决条件,否则谢绝转帖转载。网路本一家,但总不至于没个出处明示的吧!感谢你的阅读!

我要[DFCG]编写于2004.2.04

算法注册机编写扫盲---第五课相关推荐

  1. 小白第一次注册机编写,c/bat/易某言(不好意思说2333)

    小白第一次注册机编写,c/bat/易某言(不好意思说出口2333) 零.视频教程 一.免责声明 二.软件相关信息 三.查壳 四.分析软件注册流程 五.IDA载入 六.OD载入 (一).找关键跳转 1. ...

  2. TraceMe.exe注册码破解及注册机编写

    一.追注册码步骤解析 打开OllyDbg反汇编软件,对实验程序TraceMe.exe进行反汇编. 点击View-Executable modules查看可执行模块,在新窗口中右击,选择Show nam ...

  3. 010Edit分析 爆破 + 算法逆向 + 注册机编写

    爆破 假码 pName = xuanci pKey = 00112233445566778899 登录出错 复制错误信息 --------------------------- 010 Editor ...

  4. 菜鸟 学注册机编写之 “查表”

    测试环境 系统: xp sp3 调试器 :od 1.10 高手不要见笑,仅供小菜玩乐,有不对或不足的地方还请多多指教,不胜感激! 1.首先运行程序随便输入用户与注册码如下图所示: 2.载入OD通过下M ...

  5. 千里馬高中率免杀网馬賀歲版算法注册机 Code.By.HackWm[D.S.T].

    注册机上的机器码就是软件上的散列值 转载于:https://blog.51cto.com/hackwm/137561

  6. 庖丁解牛破解与注册机编写

    注册原理: 1. 机器码生成原理: 根据函数得到dwSerial,然后与一个常数0x51627384异或,结果的十六进制表示就是机器码. LPTSTR pVolumeNameBuffer = new ...

  7. 注册机编写器 Keymake v1.73 下载

    下载地址: http://www.51r.com/UploadFiles/2007-9/3008.718201455.zip

  8. 【转】破解Source Insight 3.5.0072过程 附:安装软件+注册机

    转载地址:http://blog.csdn.net/qs_hud/article/details/8884867 注册机及软件下载地址:http://download.csdn.net/detail/ ...

  9. FarPoint Spread for Windows Forms 5.0(.NET Framework 3.5). 注册机

    FarPoint Spread for Windows Forms 5.0(.NET Framework 3.5). 的已经破解,注册机编写完成. 转载于:https://www.cnblogs.co ...

  10. 010 Editor算法逆向与编写注册机

    010editor是一款非常好用的十六进制编辑工具,但是因为他是收费软件,我们接下来对此软件进行一下破解与编写注册机 将程序拖入OD,通过字符串搜索定位到核心代码,经过分析,主要是如下图所示的两个关键 ...

最新文章

  1. 刚刚,华为全场景 AI 计算框架MindSpore正式开源!国产深度学习框架的春天来了!...
  2. 华为荣耀8青春版计算机在哪里,华为荣耀8青春版
  3. 分布式MySQL数据库TDSQL架构分析
  4. html绑定多个事件,jquery可以给多个元素绑定同一事件吗?
  5. springboot redis 断线重连_Redis高可用方案实现
  6. 基于element ui的收起展开检索条件效果
  7. 利用Vailyn识别路径遍历和文件包含漏洞
  8. 超实用的浏览器插件json格式转换
  9. 必应图片搜索——产品分析
  10. snyk 项目漏洞检测
  11. VBA 获取某列最后非空单元格的行数
  12. AH快递单打印软件(顺丰申通圆通韵达中通天天EMS) 3.77
  13. fabric 中 peer 和 couch 容器内部数据存放目录地址
  14. 数字中国创新大赛决赛名单出炉,与华为云 EI 一起挑战书法识别
  15. GLSL到HLSL参考
  16. 激活函数(Activation Function)及十大常见激活函数
  17. 文末福利|使用Python转换PDF,Word/Excel/PPT/md/HTML都能转!
  18. 专业的网站流量分析和统计分析工具
  19. QQ聊天窗口上的广告与QQ弹窗广告的完美屏蔽去除
  20. ArduPilot开源飞控系统之简单介绍

热门文章

  1. 大盘点!关于无线AP的实用技术,看这篇就够了
  2. 【小家java】Java中主线程(父线程)与子线程的通信和联系
  3. android 6.0 power按键深度解析
  4. ilm 和dlm差异_价值观异质性对团队绩效的影响机制研究 ———团队互动的中介作用与DLMX的调节效应(上)...
  5. scrapy解析网页时,针对一些特别格式的数据的处理
  6. qmainwindow 标题栏_Qt:自定义标题栏(QMainWindow)
  7. 【linux】正点原子linux教程学习
  8. 请你相信心有多大,舞台就会有多大
  9. viper4Android md风格,ViPER4Android音效驱动
  10. 网络游戏广告植入案例