Access
 
Open语句的子语句用于指定所请求的权限

语法

Open filename for Binary Access {Read | Write | Read Write} as [#]filenum

用法

open filename for binary Access Read as #filenum
open filename for binary Access Write as #filenum
open filename for binary Access Read Write as #filenum

参数

Read
打开只读权限的文件。
Write
仅使用写入权限打开文件。
Read Write
以读写权限打开文件。

说明

Access与Open语句一起使用，以请求读取，写入或读取和写入权限。如果未指定Access子句，则假定为Read Write.

例子


此示例显示如何使用读打开文件“data.raw”，然后在二进制{...}中打开写访问的“data.out” 999796006}模式，由FreeFile返回的打开的文件号。
Dim As Integer o

  ''获取打开的文件编号。
  o = FreeFile
  
  ''打开文件进行只读访问。
  Open "data.raw" For Binary Access Read As #o
    
    ''在内存中创建一个缓冲区，这是文件的整个大小
    Dim As UByte file_char( LOF( o ) - 1 )

      ''将文件放入缓冲区。
      Get #o, , file_char()
    
  Close
  
  ''获取另一个打开的文件号。
  o = FreeFile
  
  ''打开文件进行只读访问。
  Open "data.out" For Binary Access Write As #o

    ''将缓冲区放入新文件中。
    Put #o, , file_char()
    
  Close

  Print "复制文件“”data.raw“”到文件“”data.out“”"

  Sleep


与QB差别

  • 没有

参考