readme.txt

GB码与BIG5码的相互转换(200KB).zip

*****************************************************
//
//  GB2312&BIG5 内码转换  1999/08/19
//
//  作者:陈国强  [e-mail]
//  原子数据工作室  http://www.quanqiu.com/vb
//
//  您可以自由的拷贝并使用本程序
//  您有义务把程序中的BUG告诉我
//
*****************************************************



☆ 模块basBIG2GB.bas中的函数说明

1. Sub InitDATA
初始化内码数据
首次调用GB2BIG或BIG2GB函数之前最好先Call InitDATA
数组BIG5Order()中存放所有BIG5码汉字对应的GB2312码的的 ANSI 字符代码。
数组GBOrder()中存放所有GB2312码汉字对应的BIG5码的的 ANSI 字符代码。
使用Chr(ANSI 字符代码)即可得到对应的汉字

2. Function GB2BIG(strGB As String) As String
GB2312码 -> BIG5码

3. Function BIG2GB(strBIG As String) As String
BIG5码 -> GB2312码

4. Function CheckBIG(strSource As String) As Boolean
判断一段文字中是否含有BIG5码汉字,可用做内码的自动识别
返回True表示包含BIG5码
返回False表示不含BIG5码,这段文字一般可认为是GB码


☆ 资源文件的生成方法详见Resource目录下的BuildDATA.vbp项目

Resource\BIG5.TXT和Resource\GB.TXT中分别存放内码信息
生成Resource\BIG5.DAT和Resource\GB.DAT后，再到集成开
发环境中使用资源编辑器(Resource Editor)新建一个资源文
件(INS.RES),包含两个自定义资源分别为BIG5.DAT和GB.DAT 
中的数据,该资源文件将被包含basBIG2GB.bas的工程引用


☆ 注意：由于Resource目录下的BuildDATA.vbp工程引用了"Microsoft
        Scripting Runtime", 因此想要正常运行您必须安装VB6.0以上版本

☆ 其他不明之处请与作者联系




                             最后更新时间: 99-8-19 9:59