| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1312 人关注过本帖
标题:如何编程序修改文本文件中各数据之间的分隔符
只看楼主 加入收藏
sxzr
Rank: 2
等 级:论坛游民
帖 子:46
专家分:14
注 册:2009-3-11
结帖率:80%
收藏
已结贴  问题点数:20 回复次数:6 
如何编程序修改文本文件中各数据之间的分隔符
有许多文本文档中的一些数据,它们是用逗号或小圆点等分隔符隔开的,有时候在进行导入操作时很不方便,我想用VB编一个程序,当打开这些文件时能自动把这些分隔符改成空格(如下例:)
把03.08.16.29.44.65.80.81
  08.26.39.43.51.58.60.67
这种形式改成:
03 08 16 29 44 65 80 81
08 26 39 43 51 58 60 67
这种形式,不知道能否用VB编程实现这种修改,敬请各位大师指点。
搜索更多相关主题的帖子: 文本文件 数据 分隔 编程序 
2010-10-02 14:54
zmh886
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:12
帖 子:238
专家分:1305
注 册:2010-6-2
收藏
得分:20 
如果文本不是很多  直接用记事本打开 替换

http://www./
2010-10-02 15:28
zmh886
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:12
帖 子:238
专家分:1305
注 册:2010-6-2
收藏
得分:0 
vb代码

open "c:\boot.ini" for input as #1
 while not eof(1)
  line input #1,a
  s=s & a & vbcrlf
 wend
close #1

'需要什么就添加什么。
s=replace(s,"."," ")
s=replace(s,"|"," ")

open "c:\boot2.ini" for output as #1
print #1,s
close #1

http://www./
2010-10-02 15:30
sxzr
Rank: 2
等 级:论坛游民
帖 子:46
专家分:14
注 册:2009-3-11
收藏
得分:0 
再请教一下,这个代码添加到什么地方?是用记事本编辑吗?
2010-10-02 16:18
zmh886
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:12
帖 子:238
专家分:1305
注 册:2010-6-2
收藏
得分:0 
Private Sub Form_Load()
Open "c:\boot.ini" For Input As #1
While Not EOF(1)
  Line Input #1, a
  s = s & a & vbCrLf
Wend
Close #1

'需要什么就添加什么。
s = Replace(s, ".", " ")
s = Replace(s, "|", " ")

Open "c:\boot2.ini" For Output As #1
Print #1, s
Close #1
End Sub

http://www./
2010-10-03 15:23
zhuiis
Rank: 4
等 级:业余侠客
威 望:1
帖 子:201
专家分:286
注 册:2008-11-8
收藏
得分:0 
看来楼主还是个新手!
2010-10-04 11:10
sxzr
Rank: 2
等 级:论坛游民
帖 子:46
专家分:14
注 册:2009-3-11
收藏
得分:0 
谢谢两位指点,我确实是刚学VB。
2010-10-04 12:52
快速回复:如何编程序修改文本文件中各数据之间的分隔符
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.033418 second(s), 10 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved