教程说明.txt

加密的小软件

爱国者安全网
www.3800hk.com
专业的红客安全技术培训基地
多抽出一分钟时间学习.让你的生命更加精彩.
动画教程只是起到技术交流作用.请大家不用利用此方法对国内的网络做破坏.
国人应该团结起来一致对外才是我们的责任.由此动画造成的任何后果和本站无关.
-------------------------------------------------------------------------
大家好我是脏孩儿QQ297061006.今天教大家用VB简单制作加密解密工具.


  首先声明.加密就是把明文通过某种运算变成暗文.解密就是把暗文通过逆运算推出明文.
 
   下面让我们来打开VB6.首先我们要做一个加密解密工具的外貌.这个看我操作.


    好了做好了.下面我们要为加解密编写代码.这个看我操作吧.
 
 
       制作简单加密解密工具.用到的代码为. 加密Dim a1 as integer定义一个变量
                                       
                                          a1=str(text1.text)让a1在编辑框1中显示
                                      
                                          a1=(a1 + 10)*90-30对a1进行加密运算.

                                          text2.text=val(a1)让加密后的a1在编辑框2中显示


                                       解密Dim a2 as integer定义一个变量
                                              
                                           a2=str(text2.text)让a2在编辑框2中显示
                                         
                                           a2=(a2+30)/90-10对a2进行解密运算.

                                           text3.text=val(a2)让加密后的a2在编辑框3中显示  
  

  















   大家看一下是不是很简单?许多软件的加密解密都是通过他们实现的.
   
    好了教程就到这里 88 . 黑鹰是个很不错的站. 大家支持他吧.