| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 948 人关注过本帖
标题:请问VB如何调用文本文档?
只看楼主 加入收藏
七彩阳光
Rank: 1
等 级:新手上路
帖 子:23
专家分:4
注 册:2011-4-10
结帖率:100%
收藏
 问题点数:0 回复次数:7 
请问VB如何调用文本文档?
如题,请问怎样调用文本文档并显示里边的内容?
搜索更多相关主题的帖子: 如何 
2011-04-10 14:05
睿翼
Rank: 3Rank: 3
来 自:广东
等 级:论坛游侠
帖 子:40
专家分:175
注 册:2010-12-13
收藏
得分:0 
open 语句
2011-04-10 15:20
lowxiong
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:27
帖 子:653
专家分:3402
注 册:2008-5-7
收藏
得分:0 
最简单就是
open "c:\abcd.txt" for input as #1
或者是文件操作类filestream
2011-04-10 15:25
七彩阳光
Rank: 1
等 级:新手上路
帖 子:23
专家分:4
注 册:2011-4-10
收藏
得分:0 
回复 3楼 lowxiong
请问下后面的“#1”是什么?做什么用的?还有“input”是什么的?
然后用这个代码是会出现:
实时错误:'55':
文件已打开

可是根本没打开

[ 本帖最后由 七彩阳光 于 2011-4-10 16:26 编辑 ]
2011-04-10 16:21
wube
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:23
帖 子:1820
专家分:3681
注 册:2011-3-24
收藏
得分:0 
#1大概是指文本在Open程序中对应的编号
Input是把Data从文本Load到VB
Output就是相反的功用

Open之后也要对应一个Close #1~而要做的事就写在中间~
否则下次要用到时就会出现档案已开启的讯息~

也可能是你之前用过这编号了~却没Free掉~导致资源被占据~
所以建议编号不要写死~用变量取代~用完要关掉~
例如:
Private Sub Form_Load()
Dim FileNum As Integer, TempString As String
    FileNum = FreeFile
    Open "D:\ptarp.conf" For Input As #FileNum
        Do While Not EOF(FileNum)
            Line Input #FileNum, TempString '一次读一行到TempString
            Text1.Text = Text1.Text & TempString & vbCrLf
        Loop
    Close #FileNum
End Sub

不要選我當版主
2011-04-10 17:45
七彩阳光
Rank: 1
等 级:新手上路
帖 子:23
专家分:4
注 册:2011-4-10
收藏
得分:0 
回复 5楼 wube
可以解释下从"DO WHILE"后面的语句的意思吗?我刚接触VB不久看不怎么懂.这里面的"&"又是干什么用的?最后再请教下编写程序可以用中文吗?
2011-04-12 14:43
wube
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:23
帖 子:1820
专家分:3681
注 册:2011-3-24
收藏
得分:0 
限定这个页面  没回传值的函式  这个页面_读取事件()
宣告 FileNum 是整数, TempString 是字串
    FileNum = 系统随机找个没被用过的编号
    执行开档程序  "路径" 模式  读入  对应  #FileNum
        Do While 还没 读完(开档程序占用的这个档案)
            读一行 读进来 #开档程序占用的这个档案 , 存在TempString
            控件内文 = 控件内文 串接 TempString 串接 回车符号
        Loop '换下一行
    关闭开档程序 #FileNum
结束 没回传值的函式

字串连接最好用 & 去串接~ 虽然用 + 也行~但是老前辈说不好~ 所以用 & 吧 ~

能用中文阿~看要用在哪~有差!像上面这样一定不行~

[ 本帖最后由 wube 于 2011-4-12 22:03 编辑 ]

不要選我當版主
2011-04-12 22:02
thinkingxh
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2011-6-23
收藏
得分:0 
蜘蛛大虾,看了后更有信心用vb解决我那个问题了 ,嘿嘿 希望你有时间多指导我们这样新人哈 不胜感激!
什么事都 贵在精不在多,先遇到你 就认定你咯 呵呵
2011-06-23 14:52
快速回复:请问VB如何调用文本文档?
数据加载中...
 
   



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

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