网上找到的许多字符串加密的函数只能对英文字符串进行加密，字符串中若含有汉字则*为力了，经过研究，对网上下载的源码进行了部分修改添加，使得可以对中文字符串也可以进行加密，支持英文与汉字混合字符串加密，VB中对字符串进行加密的模块,字符串中可以有中文字符,使用方法:cipher 密码,源串,存放加密后的字符变量 解密用decipher 密码,被加密的字串,字符串变量。源码多数为网上下载源代码，本人只进行了组合修改，支持回车换行与制表符等部分控制格式的字符，解密后的字符串完全保留原样，该代码已在作者程序中使用，VB6上通过。-Many of the Internet to find a function of the string encrypted string of English can only be encrypted if they contain strings of characters are powerless, after research on the Internet to download the source code to add some modifications to enable the Chinese string also can encryption, support of mixed English and Chinese characters string encryption, VB string is encrypted on the module, the string can be in Chinese characters, use: cipher code, the source string, the characters stored encrypted variable　decrypted using decipher password, the encrypted string, string variable. Source the majority of downloading the source code, I only had a combination of changes to support the carriage return line feed and tab format, such as some control characters, decryption fully retained after the original string, the code has been used in the author of the procedure, VB6 adopted.