24小时热门版块排行榜    

查看: 1135  |  回复: 4
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

deephill

铁杆木虫 (职业作家)

[求助] vb读 "UTF-8" 编码 乱码如何解决?

最近遇到一个问题:用vb读取kml文件,(在googlemap中标记的点保存为kml类型的文件)文件中采用encoding="UTF-8" 编码,用richtextbox load,和Open FileName For Binary As #1 读出来,其中的汉字都是乱码。如何处理?如何转换成unicode?
文件中多数是英文字母,怎样选择性的将汉字转换成可以识别的汉字?
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

chelator

木虫 (小有名气)

【答案】应助回帖

Open FileName For Input As #1
3楼2013-06-24 15:02:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 5 个回答

deephill

铁杆木虫 (职业作家)

没有人回答。
2楼2013-06-14 08:13:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

deephill

铁杆木虫 (职业作家)

引用回帖:
3楼: Originally posted by chelator at 2013-06-24 15:02:32
Open FileName For Input As #1

此法不行。
4楼2013-07-04 22:50:39
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

libralibra

至尊木虫 (著名写手)

骠骑将军

【答案】应助回帖

如果是.net有方便的控件,如果是vb6,用adodb来试试,示例如下
CODE:
Dim objStream As Object
Set objStream = CreateObject("ADODB.Stream")
With objStream
        .Type = 2
        .Mode = 3
        .Open
        .Charset = "UTF-8" ' 编码
        .LoadFromFile "文件路径"
        .ReadText ' 读取内容
        ' 或者用 .SaveToFile 方法保存文件
        .Close
End With

matlab/VB/python/c++/Java写程序请发QQ邮件:790404545@qq.com
5楼2013-07-05 00:10:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +4 3n8v2C8RimXI 2026-09-13 4/200 2026-09-14 15:48 by Aj1rhIDL5ixY
[考研] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 3n8v2C8RimXI 2026-09-13 4/200 2026-09-14 15:45 by Aj1rhIDL5ixY
[考博] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +4 3n8v2C8RimXI 2026-09-13 4/200 2026-09-14 15:37 by Aj1rhIDL5ixY
[找工作] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +5 QUjhNVAcOSff 2026-09-13 6/300 2026-09-14 15:21 by Aj1rhIDL5ixY
[考博] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +4 QUjhNVAcOSff 2026-09-13 4/200 2026-09-14 15:13 by Aj1rhIDL5ixY
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 QUjhNVAcOSff 2026-09-13 3/150 2026-09-14 15:09 by Aj1rhIDL5ixY
[博后之家] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 QUjhNVAcOSff 2026-09-13 4/200 2026-09-14 15:01 by Aj1rhIDL5ixY
[公派出国] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +4 QUjhNVAcOSff 2026-09-13 6/300 2026-09-14 15:00 by Aj1rhIDL5ixY
[考研] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 QUjhNVAcOSff 2026-09-13 3/150 2026-09-14 14:57 by Aj1rhIDL5ixY
[考博] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 s3fFTmArrBt6 2026-09-14 3/150 2026-09-14 12:35 by 40ms4Wlo4umh
[基金申请] 求教各位大神:2026教育部人文社科青年基金项目何时公示呀? +5 云宴山人 2026-09-10 7/350 2026-09-14 12:11 by ecnu2013
[考研] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 LwdutQ8HoqWP 2026-09-13 3/150 2026-09-14 11:13 by 23jxep3nCNZb
[找工作] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 3n8v2C8RimXI 2026-09-13 3/150 2026-09-14 10:59 by 23jxep3nCNZb
[博后之家] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 3n8v2C8RimXI 2026-09-13 3/150 2026-09-14 10:56 by 23jxep3nCNZb
[博后之家] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 QUjhNVAcOSff 2026-09-13 3/150 2026-09-14 10:11 by 23jxep3nCNZb
[考研] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 QUjhNVAcOSff 2026-09-13 4/200 2026-09-14 10:01 by 23jxep3nCNZb
[考博] 西北工业大学材料学院电化学传感与催化课题组招收2027年推免研究生、博士生、博士后 +3 马方园 2026-09-10 4/200 2026-09-14 09:29 by Chem张zz
[考博] 27秋季材料博士申请求助 10+3 Cahal1 2026-09-11 4/200 2026-09-14 08:50 by 北京莱茵编辑
[教师之家] 浙江师范大学是怎么坑我的 +10 recruit123 2026-09-09 15/750 2026-09-13 10:45 by seaskyy
[有机交流] 科研求助 10+4 我吃一只鱼 2026-09-07 4/200 2026-09-10 08:32 by 0940628
信息提示
请填处理意见