VB文件系统编程中的常用函数

一，CurDir函数

返回当前默认路径，以Variant形式或String值形式返回

语法：CurDir

举例：msgbox"当前系统的默认路径是：" & CurDir

二，GetAttr函数

返回文件的特定属性是否设置，以integer形式返回

语法：GetAttr(包括文件名的文件路径字符串) and 属性常数

举例：GetAttr("E:\新文件.txt") and vbReadOnly

该语句用于检测E盘根目录下的“新文件.txt”文件只读属性是否勾选，如果具备已读属性则返回一个非零的值，如果没有只读属性则返回零

三，FileDateTime函数

以Date型或者Variant型返回一个日期和时间，表示文件创建或最近修改的日期和时间值。

语法：FileDateTime(包括文件名的文件路径字符串)

举例：Msgbox"该文件的最后修改时间是：" & FileDateTime("E:\新文件.txt")

以上例子是通过msgbox函数输出E盘根目录下“新文件.txt”的最后修改时间或创建时间。

四，FileLen函数

返回一个Long型值来表示文件的大小，也就是文件的长度，单位是字节。

语法：FileLen(带文件名的文件路径字符串)

举例：MsgBox"该文件的大小是：" & FileLen("E:\新文件.txt") & "字节"

以上例子通过Msgbox函数输出E盘根目录下“新文件.txt”文件的大小。

五，EOF函数

返回一个bool型的值，用来确定指针是否到文件末尾

语法：EOF(文件号)

举例：EOF(1)

以上例子返回一号文件的指针是否已经到文件末尾

六，LOF函数

返回一个Long型的值，表示用Open语句打开的文件的大小，以字节为单位，该函数与FileLen函数有本质区别。FileLen函数不需要将文件打开就能返回大小，而LOF函数的参数必须是打开文件的文件号。