社区
VB基础类
帖子详情
读中文TXT文件?
lelexy
2007-06-05 11:32:54
VB怎么去读一个TXT文件中的中文字条符串?
Line Input #2, InputD
CTitle = Split(InputD, ":")
CTitleTemp = StrConv(CTitle(1), vbUnicode)
用StrConv函数转换了,但还是乱码,请高手指教啊,多谢
...全文
286
6
打赏
收藏
读中文TXT文件?
VB怎么去读一个TXT文件中的中文字条符串? Line Input #2, InputD CTitle = Split(InputD, ":") CTitleTemp = StrConv(CTitle(1), vbUnicode) 用StrConv函数转换了,但还是乱码,请高手指教啊,多谢
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
VBAdvisor
2007-06-05
打赏
举报
回复
中国最佳原创:[VB6]支持UTF文本文件访问的模块
http://blog.csdn.net/zyl910/archive/2006/05/30/762693.aspx
转贴:good format at:
http://chenoe.com/blog/article.asp?id=2030
zdingyun
2007-06-05
打赏
举报
回复
WINXP的记事本保存文件时缺省是按UTF-8格式保存的。可用WINXP记事本打开后另存为ANSI格式保存,再用VB打开就不是乱码了。
嗷嗷叫的老马
2007-06-05
打赏
举报
回复
cike_1111() ???
好熟啊......我是马大哈.....
嗷嗷叫的老马
2007-06-05
打赏
举报
回复
顶1楼.
那的确是个好代码.
我一般自己用时,是使用二进制来读.如下:
dim tmpStr as string
open "xx.txt" for binary as #1
tmpstr=space(eof(1))
get 1,,tmpstr
close #1
这样,tmpstr里面就是文件的内容了.
使用split可以根据换行符拆分一下.
lelexy
2007-06-05
打赏
举报
回复
是TXT文件中的中文字符串,读出来放到变量就成乱码了
cike_1111
2007-06-05
打赏
举报
回复
文件中的中文字条符串???
没能理解LZ 意思!! 读txt 不管中文英文,把其理解为字符串 处理就好了!
下面请LZ 跟我做个例题: 把下列文本读入程序:
--------------------
vbblack:黑色
RGB:颜色函数
随机函数:rnd
cike技术交流群:16874787
--------------------
现在要把上面的东西读入程序中的 text1 text2 text3
其中text1读取 所有txt内容
text2 提取 ":" 符号左边的字符
text3 提取 ":"符号由边的字符
步骤1: 复制上面代码到 c:\1.txt中
步骤2:新建VBexe 把如下控件拖动到窗体中:text1 text2 text3 command1
步骤3:分别设置text1 text2 text3 为多行 [这个会设置吧!]
步骤4:复制以下代码:
Private Sub Command1_Click()
Open "c:\1.txt" For Input As #1 '打开文件
'先清空
Text1 = ""
Text2 = ""
Text3 = ""
Do Until EOF(1) = True '文件没读完就继续
Line Input #1, 变量 '提取出该行 用变量存储
总内容 = 总内容 & 变量 & vbCrLf '这个变量用来存储总的内容
If InStr(变量, ":") > 0 Then ' 以某符号为标识 有这个符号就开始进行操作
符号位置 = InStr(变量, ":") '提取标识位置 用做以下计算
左边字符 = Left(变量, 符号位置 - 1) '提取标识左边的字符
右边字符 = Right(变量, Len(变量) - 符号位置) '提取右边
左边内容 = 左边内容 & 左边字符 & vbCrLf '这边变量存储左边的字符
右边内容 = 右边内容 & 右边字符 & vbCrLf '右边
End If
Loop '记得结束循环
Text1 = 总内容 '以上提取的内容分别赋到对应的控件内
Text2 = 左边内容
Text3 = 右边内容
Close #1 '记得关闭文件
End Sub
==================================================
cike技术交流群 16874787
解决Labview中关于
读
取
txt
文本
文件
,
读
出来是乱码的问题
解决Labview中关于
读
取
txt
文本
文件
,
读
出来是乱码的问题
字符串+数据混合
文件
(
txt
等)的matlab
读
取
将混合有字符串和数据的
文件
,在matlab中
读
取,提取数据信息。 运用脚本,适合批量
读
取,而非手动插入数据。
C++汉字转换文字并存入
txt
文件
C++的学习。用到的相关知识:类型转换;字符串连接;
文件
的
读
取
易语言向编辑框导入
txt
文本乱码怎么解决?
易语言向编辑框导入
txt
文本乱码怎么解决?
C#
读
取
中文
文件
出现乱码的解决方法
本文实例讲述了C#
读
取
中文
文件
出现乱码的解决方法。分享给大家供大家参考。具体分析如下: 先来看这段代码: FileStream aFile = new FileStream(SingleFile,FileMode.Open); StreamReader sr = new StreamReader(aFile,Encoding.GetEncoding(gb2312),true); string FileContent = sr.ReadToEnd(); aFile.Close(); ProcessData Pd = new ProcessData(); Pd.ProceData(FileC
VB基础类
7,785
社区成员
197,585
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章