作者fumizuki (蒙面加菲狮)
看板Visual_Basic
标题Re: [VB6 ] 读取档案限定读取某行
时间Tue Mar 20 06:31:30 2007
※ 引述《hoseehosee (^_^)》之铭言：
: ※ 引述《fumizuki (蒙面加菲狮)》之铭言：
: : VB 内建的档案存取不提供 skip 方法，所以必须逐行读取，
: : 可以改用 Scripting.FileSystemObject：
: : Set fs = CreateObject("Scripting.FileSystemObject")
: : Set File = fs.OpenTextFile("c:\xxx.txt")
: : For i = 1 To 15999
: : File.SkipLine
: : Next
: : buffer = File.ReadLine
: : Print buffer '第16000行
: 上面的方法可以成功的读取到我所要的行数
: 接着的问题是要怎麽去收档案里面的data呀?
: 像是Input #x,a,b,c这样可以用三个变数去抓档案中的data
: 那我档案中如果有1,2,3这样的data
: 该用怎样的语法去抓呢?
: (应该是可以利用字串存起来然後去判断，但是有没有比较快的方法呀?)
: 感谢！
那个物件只提供读字元、读行、读全部的方法
如果像是1,2,3这样固定分隔字元的话
arr = Split(buffer, ",")
a = arr(0)
b = arr(1)
c = arr(2)
--
▃▅▇▆▄ ▆▂▃ `
逝去感情如何能留住，半点痴情遗留殊不易，██▅▇▄▃ ▇▃▂" .
█████████▃i ▁▄▇
更多凄凄惨惨的遭遇…………██▆▃ █▅▆▃ˍ▄*
◢ ▂█▄▇▅▂▌.
我不知道，王～八～蛋～～！ ▂▆███ █▄▃ 。fumizuki。Check。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 123.194.224.174
1F：推 hoseehosee:感谢感谢！ 已完成想要的功能 03/20 13:43