[求助]数组占用内存问题?

Question

如下代码将文件读入数组：
Private Sub Command1_Click()
Dim Fnum As Long
Dim strFile As String
Dim abyteFile() As Byte
strFile = "c:\windows\desktop\222.bmp"
Fnum = FreeFile
Open strFile For Binary As #Fnum
    ReDim abyteFile(1 To FileLen(strFile))
    Get #Fnum, , abyteFile
Close #Fnum
End Sub
当图像有100MB时，我的电脑：CPU 500，内存128，系统WIN-ME，打开用了３分钟左右，但用ACDSee或画图一分钟不到就打开了，VB有什么好的方法读数组吗？

Answer 1

把ReDim abyteFile(1 To FileLen(strFile))这一句放到open语句之前可以加快速度