Re: [VB6 ] 讀取檔案限定讀取某行
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
討論串 (同標題文章)
以下文章回應了本文:
完整討論串 (本文為第 4 之 6 篇):
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章