VB 实现中文文本的加密方法
VB文本加密 特别设计到中文加密 让很多人费尽周折,经常会碰到解密中文出现乱码的情况
下面这篇文章将对此做了说明
代码也在文章里面包括
计算机世界2000年第36期
实现中文文本的加密方法
武汉交通科技大学计算机科学与工程系 吴业福
本文介绍了在VB6中实现中、英文文本加、解密的技术细节。文中深入地探讨了VB6中汉字加、解密的原理、散列函数的构造方案，在加、解密方产生散列函数的种子值（初始值）和用于加、解密的随机序列数的方法。最后该技术实现了一个简单的128位的加、解密方案。文中涉及到了加密技术的一些主要关键概念及其具体实现技术，如散列函数、加密强度等。
绪 论
加密（Encryption）是信息保护的一种必不可少的手段。目前有两种基本的加密方法，即私钥加密和公钥加密。用VB既可用自定义算法实现简便的私钥加密，也可通过调用Crypto API接口实现复杂的公钥加密。
本文介绍一种私钥加密技术，不仅能加密英文文本，而且能有效加密汉字。
密文文本=HASH(DateTime)＋HASH(DateTime＋Key)＋ Encryption(Text,HASH(DateTime)＋HASH(DateTime＋Key)
VB具体实现技术
1． 基本加解密函数（XOR）
在VB中提供了一个XOR函数，它既可对字符也可对数字、布尔变量进行异或，两次异或的结果即为原值。因此，它是基本加解密函数。
例如：Ascw（“息”）XOR 28值为24943，24943 XOR 28值为24687，Chrw(24687) 值为“息”。
2.汉字的加密与解密方法
在VB中，字符的处理相当复杂，特别是汉字和英文字符混合处理，其结果更是无法预料。在VB内部，字符全部作为Unicode处理，并且VB支持三种类型的字符集，并提供了相应的字符处理函数。
VB支持的三种类型字符集是：
⑴ ANSI：一个字节表示一个字符，汉字被作为两个 ANSI字符；
⑵ DBCS：双字节字符集，0～128表示ASCII字符， ASCII字符长度为1个字节，汉字等东亚字符的长度为2个字节，汉字被作为一个DBCS字符；
⑶ Unicode：用两个字节表示每个字符。ISO几乎为每种语言的每个字符和符号在0～65，535（216－1）范围定义了一个数字，汉字被作为一个Unicode字符。
在VB6中，字符串的处理函数有ANSI/DBCS版本、二进制版本和Unicode版本。因此，对于汉字的处理相当复杂。
例如：Asc（返回第一个字符的ANSI/DBCS字符代码）；
AscB（返�
相关文档：
声明固定大小的数组
有三种方法声明固定大小的数组，用哪一种方法取决于数组应有的有效范围：
建立公用数组，在模块的声明段用 Public 语句声明数组。
建立模块级数组，在模块的声明段用 Private 语句声明数组。
建 ......
去年曾写过一篇博文，名称叫《用VB无窗口透明Usercontrol编写透明浮动按钮》，该文有一个观点是错误的，即透明无窗口Usercontrol不支持设计时点选。其实，通过在UserControl_HitTest过程里加入HitResult = vbHitResultHit语句，就可以实现设计时的点选了，为此，修改代码如下：
'* ******************* ......
之前碰到一个问题，VB中向一个C++写的DLL中注册一个Callback，C++在调用这个Callback时有些问题，具体问题描述和下面这个帖子中的情况是一样的: http://topic.csdn.net/t/20051104/09/4370840.html
经过尝试以后发现，在VB中写的回调函数必须是用Function关键字，并且，必须要设置返回值，如下：
Public Function Callbac ......
本文来自此帖的冗长讨论，感谢Tiger_Zhao的全程指点和陈辉、阿勇、马云剑等很多朋友的热心参与。本文其他部分在：（二）、（三）、（四）。
话说VB6是个很认真细致的妈妈，它会悄没声地帮你做很多事。今天我们来说的是VB6在API调用时自动对字符串参数进行转换的“好人好事”。
第一节 体贴的VB妈 ......
分类：VB学习 字号： 大大 中中 小小 mid(字符串，从第几个开始，长度) 在[字符串]中[从第几个开始]取出[长度个字符串]
例如 mid("小欣无敌",1,3) 则返回 "小欣无"
instr(从第几个开始,字符串1,字符串2) 从规定的位置开始查找，返回字符串2在字符串1中� ......
