| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 5759 人关注过本帖
标题:关于vb读取文本文件
只看楼主 加入收藏
ellex
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2005-6-22
收藏
 问题点数:0 回复次数:13 
关于vb读取文本文件
请问,如果有一个文本文件,里面的数据是用空格分隔开的,如何用vb把这些数据分别读取出来?
搜索更多相关主题的帖子: 文本文件 
2006-08-31 18:33
yeshirow
Rank: 4
等 级:贵宾
威 望:10
帖 子:854
专家分:0
注 册:2006-6-8
收藏
得分:0 
是不是這種形式啊:

"第一列","第二列","第三列"
123,456,778
432,43,663

原來朋友仔感情再天真, 亦是我永遠也會愛惜的人, 明日愛他人, 也記住學會不要緊; 原來朋友比戀人更高分, 亦讓我開始懂得不記恨, 若大家都敏感, 我更要永遠記得拒絕再因小事怪人, 爲何沒有這條校訓...Twins-朋友仔 MCSD Training
2006-08-31 18:40
xinfresh
Rank: 4
等 级:贵宾
威 望:13
帖 子:594
专家分:0
注 册:2006-1-13
收藏
得分:0 
全读到一个String里,然后Split

E-mail:xinfresh@QQ:383094053校内:http:///getuser.do?id=234719042
2006-08-31 18:57
yeshirow
Rank: 4
等 级:贵宾
威 望:10
帖 子:854
专家分:0
注 册:2006-6-8
收藏
得分:0 
10000 行呢?

原來朋友仔感情再天真, 亦是我永遠也會愛惜的人, 明日愛他人, 也記住學會不要緊; 原來朋友比戀人更高分, 亦讓我開始懂得不記恨, 若大家都敏感, 我更要永遠記得拒絕再因小事怪人, 爲何沒有這條校訓...Twins-朋友仔 MCSD Training
2006-08-31 19:02
ellex
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2005-6-22
收藏
得分:0 

不是二楼这样的格式,不是用逗号分开,是使用空格分开的

"第一列","第二列","第三列"
123 456 778 2255
432 43 663 11

2006-08-31 19:25
yeshirow
Rank: 4
等 级:贵宾
威 望:10
帖 子:854
专家分:0
注 册:2006-6-8
收藏
得分:0 
用甚麽分開都可以, (不要是 " (雙引號)),
是不是每一行都是用空格分開的?

原來朋友仔感情再天真, 亦是我永遠也會愛惜的人, 明日愛他人, 也記住學會不要緊; 原來朋友比戀人更高分, 亦讓我開始懂得不記恨, 若大家都敏感, 我更要永遠記得拒絕再因小事怪人, 爲何沒有這條校訓...Twins-朋友仔 MCSD Training
2006-08-31 19:38
ellex
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2005-6-22
收藏
得分:0 
是的,每一行都是用空格的
2006-08-31 20:20
yeshirow
Rank: 4
等 级:贵宾
威 望:10
帖 子:854
专家分:0
注 册:2006-6-8
收藏
得分:0 

可以使用 Text Driver 數據庫操作 (ADO 的引擎)

例如, 你的文件是 a.txt, 內容如下:

field1 field2 field3
1,2,3
4,5,6


對於 TextDriver 而言, a.txt, a 就是一個表 (同一目錄下的 txt 文件是一個表), 可以使用 ADO 訪問,
首先要建立一個 schema.ini 放在相同的文件夾下, 對於 a.txt , 此文件的內容如下:

Format=Delimited( )
Col1=field1 short
Col2=field2 Long
Col3=field3 Long


如此就可以用 ADO 建立數據庫連接了
Set hConn = CreateObject("ADODB.Connection")
hConn.Open "Driver={Microsoft Text Driver (*.txt; *.csv)};DBQ=txt文件的目錄"
...........

以下的你應該可以操作了,
例如讀取 表 a :
SELECT * FROM a


原來朋友仔感情再天真, 亦是我永遠也會愛惜的人, 明日愛他人, 也記住學會不要緊; 原來朋友比戀人更高分, 亦讓我開始懂得不記恨, 若大家都敏感, 我更要永遠記得拒絕再因小事怪人, 爲何沒有這條校訓...Twins-朋友仔 MCSD Training
2006-08-31 21:26
ivan79
Rank: 1
等 级:新手上路
帖 子:22
专家分:0
注 册:2006-3-10
收藏
得分:0 
无限仰慕中
2006-09-02 17:26
xinfresh
Rank: 4
等 级:贵宾
威 望:13
帖 子:594
专家分:0
注 册:2006-1-13
收藏
得分:0 
关数据库什么事。这个方法当然不是不可以,不过方法在于求质不求量,能简则简,不是路子越多越好

E-mail:xinfresh@QQ:383094053校内:http:///getuser.do?id=234719042
2006-09-03 18:31
快速回复:关于vb读取文本文件
数据加载中...
 
   



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

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