看到几个地方都是用下面的方法读取.CSV文件中的数据，每个TIMER事件都将文件过滤一遍至文件末尾，文件有一万多行。效率很低。

有没有从文件末尾往前读数据的方法？或者根据文件的大小变化触发事件，并读取增加的数据？

Open cs For Input Access Read As #fr
    Do While Not EOF(fr)
        Line Input #fr, j
        If InStr(1, j, ";") > 0 Then

。。。。。。。。。。。。。。。。。

我已学会了指针，速度极快，CPU占用率从近60%一下降到了3以下。
Open cs For Random As #10 Len = Len(MyRecord)
Seek #10, LOF(10) / Len(MyRecord)            ''''''''''''''指针移至最后一行
Get #10, , MyRecord
Close #10
上面这段代码在网上搜很久也没找到，不过得到了提示琢磨一下就写出了。
爽！！！！！
有些成功的感觉
拿来给大家分享一下

版主讲的极是，不过用之前我已注意到了这个问题，对数据采集的程序作了格式化，使得每行数据字符数完全一样，并且在画图之前用FORMLOAD对数据进行了初始化，程序一运行就看着很完善，曲线很平滑。觉得VB太好入门了，现在想将这些代码编成VC，来琢磨一下，太难了，几年间听过孙鑫的光盘两遍，越听越难。主要是没有实际可以学习的实例练习。
我格式后的数据如下：
多谢你的指点，现在网络就是图书馆、网络就是老师。

1276855318;1.23900000
1276855327;1.23910000
1276855346;1.23920000
1276855349;1.23930000