编程论坛
注册
登录
编程论坛
→
VB6论坛
请问怎样把字符串转换为BIG5碼
jychoi
发布于 2021-01-15 22:05, 1494 次点击
嗎 转换 B6DC
B6DC是BIG5碼
找了很多天还没找到解决办法
3 回复
#2
yuma
2021-01-17 16:49
文件编码最简单的转换方法:
程序代码:
Private
Sub
Form_Load()
Dim
filename
filename =
"
文件.txt
"
Set
Stm =
CreateObject
(
"
ADODB.Stream
"
)
Stm.Type =
2
'
2-文本模式,1-二进制模式
Stm.Mode =
3
'
3-读写,1-读,2-写
Stm.Charset =
"
gb2312
"
'
初始文件编码,支持Unicode,utf-8,ASCII,gb2312,big5,gbk
Stm.Open
Stm.LoadFromFile filename
Readfile = Stm.ReadText
Stm.Close
Stm.Charset =
"
big5
"
'
目标文件编码,支持Unicode,utf-8,ASCII,gb2312,big5,gbk
Stm.Open
Stm.WriteText Readfile
Stm.SaveToFile (filename),
2
'
2可省略
Stm.Close
Set
Stm =
Nothing
End Sub
[此贴子已经被作者于2021-1-17 16:53编辑过]
#3
yuma
2021-01-17 17:00
字符串的编码转换用StrConv函数,参考:https://
#4
xiaoyaottt
2021-01-25 20:58
我的QQ 2776478814
1