问题描述

VB如何用二进制打开一个jpg 文件存到一个数组，每次存256循环存完。

硬盘已经有文件，
Dim fileName As String ’定义了文件路径
Dim plainText() As Byte’用来存放照片二进制数据文件的数组

Open fileName For Binary As 1#’我已经写了用二进制打开文件

'现在循环就不知道怎么写了，想每次存256个字节到plainText()数组一直循环到整个照片全部存入数组。
For i=1 To FileLen(fileName)’但是这个是每次多一个，我要的是每次256的 求助啊
for i*256 =1 to ileLen(fileName)' 这样提示语句错误

拜托了

解决方案

For i=1 To FileLen(fileName) Step 256
For j = i To i + 256
这样就可以了。

解决方案二：
一次性读到plainText()数组里不好吗？为什么每次只读256个而且还是存到相同的数组里？

一次读256个字节：
Dim plainText(255) As Byte’
For i=1 To FileLen(fileName) step 256
get #1iplaintext''每次只读256个字节
''再从plaintext()转储到其它数组里？
next