Open "TESTFILE" For Binary Access Read Write As #1
'...........
CLOSE #1

解决方案 »

  1.   

    双引号内即是你所要打开的文件的路径及文件名,binary指按二进制打开,access read write 是指以可以读写的方式打开,#1是文件号,也可用freefile()获取,这样就可以按二进制分析文件了。
    我正准备编一个程序分析文件格式也可能用到这种方式打开文件
      

  2.   

    Open Filename [for Binary] [Access Read <Access Read> <Access Write/Read>][Loack Read/Lock Write/Lock Write/read] As $filenumber
      

  3.   

    打错了
    #filenumber,比如 #1
    for 为文件打开方式,for input,for output,for append,for binary,for random
    前三种是文本方式,Randon是随机文件
    Access 当 for binary,for random时的文件打开方式,读,写,读/写Lock是文件共享As 文件号 1~255 ,程序可以打开多个文件,也可以多次打开一个文件,文件号不同
      

  4.   

    Open filename For Binary As #1'打开
    x = Input(LOF(1), 1) '读入
    Close #m
      

  5.   

    open 文件 for binary as 文件号
    读数据用get
    写数据用put
    最后close文件号
      

  6.   

    '例子:把D:\photo.jpg读出然后写(复制)到 c:\photo.jpgPrivate Sub Command1_Click()
    Dim BB() As Byte, LL As LongOpen "D:\photo.jpg" For Binary As #1
    Open "c:\photo.jpg" For Binary As #2   LL = LOF(1)
       ReDim BB(LL - 1)
       Get #1, 1, BB()     '从文件1的1处开始读取数据到字节数组bb中
       
       Put #2, 1, BB()     '把字节数组bb中的内容从文件2的1字节处写入.
       
    Close                  '关闭所有打开的文件.End Sub