Question

关于VB读入文本内容的问题

比如一个VB.TXT文件内容是："20120123","1234"
"20120143","2132"
````(省略n行）
"20120322","3231"
如何用line input 读入第k（k<n)的数据？
第k行

Answer 1

这个只能一直读，边读边计数，直到K行为止，txt文本它是ASSIC编码的，注定不能象二进制文件一样直接跳到某一指定位置读取内容的

Answer 2

加个RichTextBox

RichTextBox1.LoadFile "c:\VB.txt"
s = RichTextBox1.Text
L = Split(s, vbCrLf)(k + 1)
MsgBox L

Answer 3

txt文本是不能读取行数的，所以你只能一行一行的往下读，让他读到第k行时停止，然后输出
dim m,k as integer
k=70'你要读取的行
open "D:\vb.txt" for input as #1
Do While m<k
m=m+1
line input #1,t
loop
close #1
msgbox t '输出结果
还有你要获取txt文本的行数，也要这样一行一行读到最后，然后变量累加得出行数。。。