急急急急！！很简单的

Question

谁能解释一下，这是什么意思？？？Open Ffilename2 For Binary Access Read As #2 Len = 4   ///为什么Len=4？？
For i = 1 To 5
Get #2, i * 4, data1(i - 1)                 //////这句话的意思是？？？
Next i
Close #2
我只知道这是读取一个二进制的文件，

Answer 1

len＝4 就是每次取出4个字节的数据
下面语句的意思就是取出5段长度都为4的字节然后放到一个数组中For i = 1 To 5
Get #2, i * 4, data1(i - 1)                 //////这句话的意思是？？？
Next iOpen pathname For mode [Access access] [lock] As [#]filenumber [Len=reclength]Open 语句的语法具有以下几个部分：部分 描述 
pathname 必要。字符串表达式，指定文件名，该文件名可能还包括目录、文件夹及驱动器。 
mode 必要。关键字，指定文件方式，有 Append、Binary、Input、Output、或 Random 方式。如果未指定方式，则以 Random 访问方式打开文件。 
access 可选。关键字，说明打开的文件可以进行的操作，有 Read、Write、或 Read Write 操作。 
lock 可选。关键字，说明限定于其它进程打开的文件的操作，有 Shared、Lock Read、Lock Write、和 Lock Read Write 操作。 
filenumber 必要。一个有效的文件号，范围在 1 到 511 之间。使用 FreeFile 函数可得到下一个可用的文件号。 
reclength 可选。小于或等于 32，767（字节）的一个数。对于用随机访问方式打开的文件，该值就是记录长度。对于顺序文件，该值就是缓冲字符数。 
Get [#]filenumber, [recnumber], varname 
Get 语句的语法具有以下几个部分：部分 描述 
filenumber 必要。任何有效的文件号。 
recnumber 可选。Variant (Long)。记录号（Random 方式的文件）或字节数（Binary 方式的文件），以表示在此处开始读出数据。 
varname 必要。一个有效的变量名，将读出的数据放入其中。 

Answer 2

Ffilename2 为.bin的文件，可是用什么方式可以打开？？？，怎么往里写二进制的数？？？？

Answer 3

'读写二进制文件
Private Sub Command1_Click()
    Dim n As Long
    Dim arrBytes() As Byte
    
    '读出数据
    Open "d:\draw.ico" For Binary As 1
        n = LOF(1)
        ReDim arrBytes(1 To n) As Byte
        Get 1, , arrBytes
    Close 1
        '写入数据
    Open "d:\aaa.ico" For Binary As 2
        Put 2, , arrBytes
    Close 2
    
End Sub