一个文件，内部大概需要读取5万多个数据，然后这些数据分类，我尝试做了一下，规规矩矩的读取后再分类，大概需要1.7秒的时间；尝试使用循环分类，速度提高了三倍，大概需要0.5秒的时间，请帮忙看看，还能提速吗？多谢

附件中提供了一个“实验文件”供程序测试使用。

1、速度慢主要是I/O原因，采用一次性读取
 Open Dir1.Path & "\" & File1.FileName For Binary As #1
 File2 = LOF(1)
 ReDim filebyte(File2) As Byte
 Get #1, , filebyte()
 Close #1
2、之后你在内存数组filebyte中分类，速度就快了。

wds1大神，
我知道将文件一次性读到内存里后在内存里分类速度会很快，但是您也看到了，我目前的能力只达到了磁盘上读写读写的程度，在内存里操作对我来说感觉就是“神的操作”，语句和写法还不会，求wds1大神能否针对我的这个程序按照“在内存里操作”的方式修改一下，然后发给我，我真的想好好学习一下。
拜谢wds1大神了。

同求路过的各位版主、高手、大神。

仅增加了内存一次性读入，其他的都是用的你的代码。
你看看。

[此贴子已经被作者于2018-7-26 18:16编辑过]