Error 函数示例
本示例使用 Error 函数来显示指定的错误代号所代表之错误信息。 Dim ErrorNumber
For ErrorNumber = 61 To 64 ' 从错误代号 61 循环到 64。
Debug.Print Error(ErrorNumber) ' 将错误信息在立即窗口中显示。 Next ErrorNumber
Exp 函数
返回 Double，指定 e（自然对数的底）的某次方。 语法 Exp(number)
必要的 number 参数 number 是 Double或任何有效的数值表达式。 说明
如果 number 的值超过 709.782712893，则会导致错误发生。常数 e 的值大约是 2.718282。
注意 Exp 函数的作用和 Log 的作用互补，所以有时也称做反对数。
Exp 函数示例
本示例使用 Exp 函数计算 e（e ~ 2.71828）的某次方。 Dim MyAngle, MyHSin
' 定义角度（以“弧度”为单位）。 MyAngle = 1.3
' 计算双曲正弦函数值（sin()）。
MyHSin = (Exp(MyAngle) - Exp(-1 * MyAngle)) / 2
FileAttr 函数
返回一个 Long，表示使用 Open 语句所打开文件的文件方式。 语法
FileAttr(filenumber, returntype)
FileAttr 函数的语法具有以下几个命名参数： 部分 描述 filenumber 必要。Integer 类型，任何有效的文件号。 returntype 必要。Integer 类型。它是数字，指出返回信息的类型。指定 1 则可返回一个代表文件方式的数值。而仅仅在 16 位系统中， 指定 2 才可以恢复操作系统的文件句柄。在 32 位系统中不支持 Returntype 2，它会导致错误发生。 返回值
当 returntype 参数值为 1 时，下列返回值指出文件访问方式： 方式 值 Input 1 Output 2 Random 4 Append 8 Binary 32 FileAttr 函数示例
本示例使用 FileAttr 函数来返回一个已打开文件的文件模式以及文件句柄。返回文件句柄只适用于 16位系统; 在 32位 系统中, 把 2 作为第二个参数时将产生错误。
Dim FileNum, Mode, Handle FileNum = 1 ' 指定文件号。
Open \打开文件。 Mode = FileAttr(FileNum, 1) ' 返回 8（增加文件方式）。 Handle = FileAttr(FileNum, 2) ' 返回文件句柄。 Close FileNum ' 关闭文件。
FileDateTime 函数
返回一个 Variant (Date)，此为一个文件被创建或最后修改后的日期和时间。 语法
FileDateTime(pathname)
必要的 pathname 参数是用来指定一个文件名的字符串表达式。pathname 可以包含目录或文件夹、以及驱动器。
FileDateTime 函数示例
本示例使用 FileDateTime 函数来得知文件创建或最近修改的日期与时间。日期与时间的显示格式依系统的地区设置而定。
Dim MyStamp
' 假设 TESTFILE 上次被修改的时间为 1993 年 2 月 12 日下午 4 时 35 分 47 秒。
' 假设 English/U.S. 地区设置。
MyStamp = FileDateTime(\)Filedatetime(\返回“2/12/93 4:35:47 PM”。
FileLen 函数
返回一个 Long，代表一个文件的长度，单位是字节。 语法
FileLen(pathname)
必要的 pathname 参数是用来指定一个文件名的字符串表达式。pathname 可以包含目录或文件夹、以及驱动器。 说明
当调用 FileLen 函数时，如果所指定的文件已经打开，则返回的值是这个文件在打开前的大小。
注意 若要取得一个打开文件的长度大小，使用 LOF 函数。
FileLen 函数示例
本示例使用 FileLen 来返回文件的字节长度。示例中假设 TESTFILE 为含有数据的文件。
Dim MySize MySize = FileLen(\)Filelen(\返回文件的字节长度。
Filter函数
描述
返回一个下标从零开始的数组，该数组包含基于指定筛选条件的一个字符串数组的子集。 语法
Filter(InputStrings, Value[, Include[, Compare]]) Filter函数语法有如下几部分： 部分 描述 必需的。要执行搜索的一维字符串数组。 必需的。要搜索的字符串。 可选的。Boolean值，表示返回子串包含还是不包含Value字符串。如果Include是True，Filter返回的是包含Value子字符串的数组子集。如果Include是False，Filter返回的是不包含Value子字符串的数组子集。 可选的。数字值，表示所使用的字符串比较类型。有关其设置，请参阅下面的“设置值”部分。 InputStrings Value Include Compare 设置值
Compare参数的设置值如下： 常数 vbUseCompareOption vbBinaryCompare 值 –1 0 描述 使用Option Compare语句的设置值来执行比较。 执行二进制比较。 vbTextCompare vbDatabaseCompare 说明
1 2 执行文字比较。 只用于Microsoft Access。基于您的数据库信息来执行比较。 如果在InputStrings中没有发现与Value相匹配的值，Filter返回一个空数组。如果InputStrings是Null或不是一个一维数组，则产生错误。 Filter函数所返回的数组，其元素数目刚好是所找到的匹配项目数。
Format 函数
返回 Variant (String)，其中含有一个表达式，它是根据格式表达式中的指令来格式化的。 语法
Format(expression[, format[, firstdayofweek[, firstweekofyear]]]) Format 函数的语法具有下面几个部分： 部分 说明 必要参数。任何有效的表达式。 可选参数。有效的命名表达式或用户自定义格式表达式。 expression format firstdayofweek 可选参数。常数，表示一星期的第一天。 firstweekofyear 可选参数。常数，表示一年的第一周。 设置值
firstdayofweek 参数有下面设置： 常数 值 说明 使用 NLS API 设置。 星期日（缺省） vbUseSystem 0 VbSunday 1