VB 二進位讀取 JPG 檔案並每 256 位元組存入陣列

在 VB6 中，若要以二進位模式開啟 JPG 檔案，並每次讀取 256 個位元組存入位元組陣列，可使用 Open For Binary 與 Get 陳述式搭配 Step 256 迴圈實作。

實作步驟

1. 宣告位元組陣列 plainText()，用來儲存檔案資料。
2. 使用 Open fileName For Binary As #1 開啟檔案。
3. 利用 For i = 1 To FileLen(fileName) Step 256 迴圈，每次處理 256 位元組。
4. 在內層迴圈中逐位元組讀取，或使用 Get #1, , byteVar 讀取資料。
5. 注意最後一個區塊可能不足 256 位元組，需依實際剩餘長度處理，避免越界。
6. 讀取完畢後記得 Close #1 關閉檔案。

程式片段概念

Dim fileName As String
Dim plainText() As Byte
Open fileName For Binary As #1
For i = 1 To FileLen(fileName) Step 256
    For j = i To i + 255
        If j > FileLen(fileName) Then Exit For
        Get #1, j, byteData
        ' 將 byteData 儲存至陣列對應位置
    Next j
Next i
Close #1

這樣即可完整將 JPG 檔案的二進位資料讀入記憶體陣列中。