如何根据行数去读取文本中的数据
已知道所要的数据的行数, 如何根据它去获取文本的数据呢?
比如所要的数据在第5行.
[解决办法]
巧了，正好在做一个读文本的程序
Public Sub ReadIntros(strDbf As String) '拆分记录
Dim filenumber As Integer
Dim inbuf As String
filenumber = FreeFile
i = 1
Open strDbf For Input As filenumber
Do While Not EOF(filenumber)
Line Input #filenumber, inbuf
byout(i) = inbuf
i = i + 1
Loop
Close #filenumber
End Sub
第i行，就是byout(i)
