Dim sBuffer(1 to FILE_REC_LENGTH) As Byte

解决方案 »

  1.   

    现在改成这样了, 但是, 怎样可以跳转的指定的某一行, 进行替换? 多谢    Open sTempFile For Output As #1
        Put #1, sBuffer
      

  2.   

    用Binary方式读写文件,每个记录都加一个索引,读取指定的记录时直接根据索引中保存的物理位置用Seek语句寻址,这样速度最快,我正在做一个表格控件,就是这样做的。如果用你原来的方法,则要用一个循环读取多个记录,才能得到记录的位置。