Re: [VB6 ] 讀取檔案限定讀取某行
※ 引述《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
推
03/20 13:43, , 1F
03/20 13:43, 1F
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 6 之 6 篇):