用vb怎样打开一个2进制文件？？

Question

一个例子（二进制方式打开，全部读取，这种方法读取文本文件比较快）：
Dim TempFile As Long
Dim LoadBytes() As ByteTempFile=FreeFile
Open 文件名 For Binary As #TempFile
Redim LoadBytes(1 To Lof(TempFile)) As Byte
Get #TempFile,,LoadBytes
Close TempFileText1.Text=StrConv(LoadBytes,vbUniCode)

Answer 1

Dim bit() As Byte
Open Mypicture For Binary As #1
            ReDim bit(LOF(1)) As Byte
            Get 1, 1, bit
            Close 1