标题:大大们9999我啊 急 急
只看楼主
moonfir01
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2006-4-25
 问题点数:0 回复次数:1 
大大们9999我啊 急 急
我用VB 编了个小程序 我能把资料保存到INI文件里了 但我想把它读取出来 ,但我不知道怎么读 哪个好心的老大教教我呀  我是新手没金钱送哦
2006-04-25 23:20
VB爱上我
Rank: 6Rank: 6
等 级:贵宾
威 望:25
帖 子:478
专家分:52
注 册:2005-10-14
得分:0 

Workdir = App.Path & "\"

Fnum = FreeFile
Bigstr = ""

Open Workdir & "txt\" & txtNAME For Input As #Fnum
Do While Not EOF(Fnum)
Line Input #Fnum, tempstr
Bigstr = Bigstr & Chr(13) & tempstr
Loop
Bigstr = Trim(Bigstr) & Chr(13)
Close #Fnum


IT618资讯网 提供服务端开发,前端开发,网页特效,热门开源系统研究,软件下载,站长建站,淘宝开店等学习资料.
2006-04-26 07:58



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-60185-1-1.html




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

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