我是用下面這種方式來讀檔,可是滿慢的
請問有沒有比較快的方法呢?謝謝
Open sPath & sFileName For Binary As #1
  lFileLen = LOF(1)
  ReDim FileBuffer(lFileLen - 1)
  For i = 0 To lFileLen - 1
    Get #1, , FileBuffer(i)
  Next i
  Close #1
創作者介紹
創作者 小吳 VBQA 程式設計討論 的頭像
vbqa

小吳 VBQA 程式設計討論

vbqa 發表在 痞客邦 留言(1) 人氣( 6 )