1. 文件的打开
Open 文件说明[for 方式][access 存取类型][锁定]As[#]文件号[len=记录长度]
For 方式 指定文件的输入输出方式,包括:
字符串函数 通配符 vba. output 指定顺序输出方式,如果文件存在,原有的数据将被覆盖,若文件不存在,则新建一个文件;
b. input指定顺序输入方式,文件必须存在,否则出错;
c. append指定顺序输出方式,如果文件存在,则原有数据被保留,新的数据将从文件尾开始写入,若文件不存在,则新建一个文件;
d. random 指定随机存取方式;
e. binary 指定二进制存取方式。
access 存取类型 以何种方式打开文件,包括:
a. read 打开只读文件;
b. write 打开只写文件;
c. read write 打开读写文件;
锁定 打开该文件时,其他用户对该文件的读写方式,包括:
a. lock shared 任何机器上的任何进程都可以对文件进行读写操作;
b. lock read 不允许其它进程读该文件;
c. lock write 不允许其它进程写该文件;
d. lock read write 不允许其它进程读写该文件(若无锁定,此项为默认)
文件号 一个长整型表达式,取值在1~511之间,是文件的唯一标识
len=记录长度 指定当前与程序之间复制数据时缓冲区的字符数
2. 文件的关闭 用户对操作的文件完成后,要关闭该文件,则将它所占用的系统资源归还给系统,释放文件的控制权
Close[[#]文件号],[[#]文件号]…
3. 文件系统的其它操作语名和函数
1.Freefile 返回一个integer型值,表示一个在程序中没有使用的文件号,该函数取得文件号,可以避免文件号的冲突,其语法格式为:
Filenumber=freefile()
其中filenumber 为integer型,用于保存范围的文件号
2.LOC函数 返回一个long型值,表示由文件号指定的文件的当前读写位置,其语法格式为:
变量=LOC(文件号)
3.LOF函数 返回一个long型值,表示给文件分配的字节数,即文件的长度,其语法格式为:
变量=LOF(文件号)
4.EOF函数 用于测试文件的结束状态,返回一个boolean值,当达到以random或顺序input模式打开的文件时,返回ture。对于以binary模式打开的文件时,则试图在EOF函数返回ture之前,用input语句读取整个文件,则会产生错误。当input读取二进制文件时,应使用LOF函数和LOC函数代替EOF 函数,在使用EOF函数时,应实用GET函数,对于以output模式打开的文件,EOF总是返回ture,其语法格式为:
变量=EOF(文件号)
5.Lock和unlock语句 用于控制其它进程对于打开的整个文件文件的一部分的存取格式,其语法格式为:
Lock[#]文件号[,记录][开始]To结束]
unLock[#]文件号[,记录][开始]To结束]
6.fileattr函数 返回一个枚举值,表示打开文件所使用的模式,其语法格式为:
Fileattr(文件号)
该函数返回的枚举值指定了文件的访问模式
Fileattr函数的返回值
值 模式
1 openmode.input
2 openmode.output
4 openmode.random
8 openmode.append
32 openmode.binary
7.kill函数 用于从磁盘中删除文件,其语法格式为:
Kill pathname
其中pathname是一个字符型表达式,指定要删除的额一个或多个文件名,它可以包括目录或文件夹以及驱动器,kill支持单字符和多字符的通配使用,以同时指定多个文件的操作。
8.Filecopy函数 用于复制和移动文件,其语法格式为:
Filecopy source,destination
Source是一个字符型表达式,指定要复制的文件名,可以包括原文件的目录或文件夹以及驱动器。Destination也是一个字符型表达式,指定目标文件名,可以包括目标文件夹的目录或文件夹以及驱动器,若文件已经打开,则使用filecopy函数会发生错误,filecopy函数进行文件移动需要分两部,首先复制文件,然后删除原文件,示例:
Dim sfile,dfile As String
Sfile=”D:\he.dat”
Dfile=”E:\he.dat”
Filecopy(sfile,dfile)
Kill sfile
9.name语句 用于实现文件名的更改,其语法格式为:
Name oldpathname as newpathname
Oldpathnam是一个字符型表达式,指明已存在的文件名和路径,可以包括目录或文件夹以及驱动器。Newpathname是一个字符型表达式,指明新的文件名和路径,可以包括目录或文件夹以及驱动器。该语句可重新命名文件,并将其移动到不同的文件夹或目录中,oldpathname和newpathname在相同的驱动器中则只能重新命名已存在的文件夹或目录。
10.Dir函数 返回表示匹配指定模式或文件属性的文件名、目录名或文件夹名,其语法格式为:
Dir[(pathname[,attributes])]
其中pathname为可选项,是一个字符型表达式,用于指定文件名、目录、文件夹名或驱动
器,若没有到pathname,则返回0长度字符串,若返回长度为零的字符串,则再次调用该函数时,必须指定pathname参数,否则会引发错误。参数attributes为可选项,其值指定文件属性的枚举或数值表达式,若省略,则返回匹配pathname但没有属性的文件。
Dir函数的attributes参数枚举值
值 常量 说明
Normal vbnormal 默认值。指定无属性文件
Readonly vbreadonly 指定只读文件以及无数性文件
Hide vbhide 指定隐藏文件以及无属性文件
System vbsystem 指定系统以及无属性文件
Volume vbvolume 指定卷标。如果指定了任何其它属性,则忽略vbvolume
Directory vbdirectory 指定目录文件以及无属性文件
Archive vbarchive 自从上次备份后文件已更改
Alias vbalias 文件具有不同的名称
Dir函数支持使用多字符(*)和单字符(?)通配符以指定多文件。第一次调用dir函数时,必须提供pathname,以后再调用dir函数时,不带参数也可以检索下一个项目,不过不能以递归调用的方式调用dir函数。
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论