我是用下面這種方式來讀檔,可是滿慢的
請問有沒有比較快的方法呢?謝謝
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
請問有沒有比較快的方法呢?謝謝
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
請先 登入 以發表留言。