*--木瓜大侠提供的MyFll.Fll
*--myFll中提供有简体转繁体GB2312ToBIG5()、繁体转简体的函数BIG5ToGB2312()函数
*--用use 打开表单,然后将所有字段转为简/繁体就行了。
*--示例1:
*--简体转繁体,将GB2312内码转换为BIG5码。注意,此函数转换的是内码,并非GBK字符。
*--显示结果如果在简体系统下,是乱码
?GB2312ToBIG5("中华人民共和国")
*--繁体转简体,将BIG5码转为GB2312码,注意,此函数转换的是内码。
cBig5=GB2312ToBIG5("中华人民共和国") &&先转为繁体
?BIG5ToGB2312(cBig5) &&将繁体再转为简体
*--示例2:繁体转简体
use form1.scx
replace all methods with BIG5ToGB2312(Alltrim(methods))
replace all properties with BIG5ToGB2312(Alltrim(properties))
use
- 1
- 2
前往页