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

Question

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

Answer 1

Dim FileNumber As Integer
FileNumber = FreeFile
Open Trim(sFileName) For Input As #FileNumber
    For i = 1 To 10
        Line Input #FileNumber, TextLine
    NextTextLine是第10行数据
Do Until EOF(FileNumber)
Line Input #FileNumber, TextLine
从第11行开始处理
  
   Loop
Close #FileNumber
              ___
             (  ">
              )(
             // )  [email protected]
          --//""--－－－－－－－－－－
          -/------   

Answer 2

这样做效率太低了，如果要定位到第10000行，那么...常用的方法一般是以Binary方式读写文件，再用Seek语句定位，但这样不适用于纯文本格式的文件。