要求:按行读取一文本文件chen.txt
然后将文件以每25行/页显示 ,实现翻页功能
中间可用临时文件来存储指针
我也在忙这个问题,如果能记录这次读了25行,下次从26行读就好了。如果第二次再循环一下,会丧失性能。
richtextbox就可以了,一次读入控制翻页就行了
可以一次读入数组中:
Dim temp As New Collection
Open "c:\chen.txt" For Input As #1
Dim x As String
Do While Not EOF(1)
Line Input #1, x
temp.Add x
Loop
Close 1
读入数组对于特别多的文本文件来说可能。。。。不过读入内存后,速度就快了!
不建议一次性读入,会增加系统的开销
vb提供seek语句,为什么不用呢,我们需要做的仅仅是获取指针位置