作者MOONRAKER (㊣乌笨秃，又笨又秃)
看板Visual_Basic
标题Re: [VB6 ] 读取txt
时间Sat Jun 28 15:40:56 2008
虽然我也很习惯这种老写法，一般而言这也没什麽不好，反正都可以完成任务
但是建议你改用 filesystemobject / textstream 这种现代一点的写法
将来转到ASP或*.NET上面的时候才比较好适应
不要只会这个open；那至少有20年历史，都快老掉牙了
而且到*.NET就不能用了
以下是VBA上的例子。
Set fshandle = CreateObject("scripting.fileSystemObject")
Set infile = fshandle.getfile("d:\lng\prog\data.txt") ' 先用fso打开档案
Set instream = infile.openAsTextStream() ' 然後把档案开成ts
Do
...
infLine = instream.readline ' 这里读出来的 infLine 就是字串了。
...
Loop Until instream.atendofstream
fileSystemObject还有readAll等等方便的功能，
你可以整个档案读出来就丢进textbox里去，不用一行一行读。
其他功能你可以参阅office VBA help中fileSystemObject的项目。
--
BATCH 1 (4/20) - 如何隐身 - SPAM - 英国杀人笑话 -
http://tinyurl.com/65vvbx
BATCH 2 (5/10) - 当众脱裤 - 主教 - 傻蛋奥运会 -
http://tinyurl.com/68grk7
BATCH 3 (6/14) - 买张床 - 切达大侠 - 伐木人之歌 -
http://tinyurl.com/3zpyx5
▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄
■ 蒙帝派松正体中文计画 ■ Spam-a-lot and enjoy the pythonesque delight!
▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 59.115.217.248