7,785
社区成员
发帖
与我相关
我的任务
分享
- 全部
...
把一个大的二进制文件读到一个buffer里面可以这样写吗？为什么读到中间就会出现overflow?
Dim Data(Size2ndBoot - 1) As Byte
Do While cnt < Size2ndBoot
Data(cnt) = Asc(Input(1, #1))
cnt = cnt + 1
Loop
大家帮我看看啦
Do While cnt < Size2ndBoot
Data(cnt) = Asc(Input(1, #1))
cnt = cnt + 1
Loop
大家帮我看看啦
...全文
给本帖投票
请发表友善的回复…
发表回复
lhaaaaaa 2004-07-14
- 打赏
- 举报
还有我想把integer类型转换成type类型应该用哪个强制类型转换的函数？
lhaaaaaa 2004-07-14
- 打赏
- 举报
Get 1, , data
是什么意思啊
是什么意思啊
lhaaaaaa 2004-07-14
- 打赏
- 举报
好我试一下
northwolves 2004-07-14
- 打赏
- 举报
这样读，快速且不会溢出：
Dim data() As Byte
Open "c:\win98\setup.bmp" For Binary As 1
ReDim data(1 To LOF(1) ) As Byte
Get 1, , data
Close 1
Dim data() As Byte
Open "c:\win98\setup.bmp" For Binary As 1
ReDim data(1 To LOF(1) ) As Byte
Get 1, , data
Close 1
faib920 2004-07-14
- 打赏
- 举报
分作几个数组吧
公安备案号11010502030143- 京ICP备19004658号
- 京网文〔2020〕1039-165号
- 经营性网站备案信息
- 北京互联网违法和不良信息举报中心
- 家长监护
- 网络110报警服务
- 中国互联网举报中心
- Chrome商店下载
- 账号管理规范
- 版权与免责声明
- 版权申诉
- 出版物许可证
- 营业执照
- ©1999-2025北京创新乐知网络技术有限公司
