如何在文件处理时，从指定的行开始读？

[ftfish]

我是刚开始学vb的。在做毕业设计。使用vb做一个文本编辑的程序。类似于翻译。
是两种模型语言的转换。我用fso模块发现没法转到指定的行。求高手指教

谢谢

[道素]

Dim FileNumber As Integer
FileNumber = FreeFile
Open Trim(sFileName) For Input As #FileNumber
For i = 1 To 10
Line Input #FileNumber, TextLine
Next

TextLine是第10行数据
Do Until EOF(FileNumber)
Line Input #FileNumber, TextLine
从第11行开始处理

Loop
Close #FileNumber




___
( ">
)(
// ) [e-mail]
--//""--－－－－－－－－－－
-/------

[junwhj]

这样做效率太低了，如果要定位到第10000行，那么...

常用的方法一般是以Binary方式读写文件，再用Seek语句定位，但这样不适用于纯文本格式的文件。