如何直接搜索二进制文件的文件内容

发布网友发布时间：2022-04-30 10:55

共2个回答

热心网友时间：2022-06-21 11:16

一边读取一边查找。
A1---A8
先读取8个字节放到双向队列，如果找到返回
否则while直到文件结束
每次读取4个，把A1----A8左移4位好把新读取的4字节放进去，再查找，找到返回，找不到继续while
退出while，那就真的没有。

当然，这个算法只是简单的描述了一下，你完全可以自己再优化。

热心网友时间：2022-06-21 11:16

存放二进制文件的数据要使用字节型数组,不能是字符型数组： Dim DAT() As Byte Dim FileSize As Long '文件长度 FileSize = FileLen(文件名) '获取文件长度 ReDim DAT(FileSize - 1) As Byte Open 文件名 For Binary As #1 Get #1, , DAT Close

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com