| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1787 人关注过本帖
标题:关于vb读取文件的路径问题
只看楼主 加入收藏
rich_ying
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2006-12-22
收藏
 问题点数:0 回复次数:6 
关于vb读取文件的路径问题

在下面,涉及到一个目录问题
--------------------------------------------------------------------------------

Text1.Text = ""
fno = FreeFile
Open "e:/abc.txt" For Input As #fno
Do Until EOF(fno) then
Line Input #fno, newline
Text1.Text = Text1.Text & Trim(newline) & Chr(13) + Chr(10)
Loop
Close #fno

--------------------------------------------------------------------------------
我现在用的是绝对路径e:/abc.txt,
有没有相对路径呀?
比如,我在e:/myvb/目录下存放了我的vb程序目录,编译后的exe文件也在这里,
而我的abc.txt文件也在e:/myvb/下,能不能表示成相对路径呀?

搜索更多相关主题的帖子: 路径 fno newline 文件 
2006-12-22 15:55
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 
App.Path & "\abc.txt"

我的msn: myfend@
2006-12-22 16:01
rich_ying
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2006-12-22
收藏
得分:0 
thank you
2006-12-22 16:05
学习VB才2天
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1653
专家分:0
注 册:2006-5-4
收藏
得分:0 
  不是吧````

[GLOW=255,DeepPink,3]我的免费网盘[/GLOW]
2006-12-23 10:18
小妖1119
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2006-12-22
收藏
得分:0 
。。。
2006-12-23 10:44
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
收藏
得分:0 

有BUG啊
在一般目录下可以用 比如 E:\MSDN98\abc.txt

如果你直接存放到 C D E== 盘下 就会出现 E:\\abc.txt 导致地址不能用


If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-05-25 11:14
心中有剑
Rank: 2
等 级:新手上路
威 望:5
帖 子:611
专家分:0
注 册:2007-5-18
收藏
得分:0 
app.path &amp; iif (right(app.path,1)="/","","/") &amp; "abc.txt"

2007-05-25 13:42
快速回复:关于vb读取文件的路径问题
数据加载中...
 
   



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

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