Re: [VB6 ] 讀取檔案限定讀取某行

看板Visual_Basic作者 (矇面加菲獅)時間18年前 (2007/03/16 06:55), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串4/6 (看更多)
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行 -- ▃▅▇▆▄ ▆▂▃ ` 逝去感如何能留住,半點遺留殊不易,██▅▇▄▃ ▇▃▂" . █████████▃i ▁▄▇ 更多悽悽慘慘的遭遇………██▆▃ █▅▆▃ˍ▄* ▂█▄▇▅▂. 我不知道,王~八~蛋~~! ▂▆███ █▄▃ 。fumizuki。Check。 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 123.194.224.174

03/17 10:17, , 1F
感謝!我晚點會試試看 ^^
03/17 10:17, 1F
文章代碼(AID): #15-SxV4z (Visual_Basic)
文章代碼(AID): #15-SxV4z (Visual_Basic)