JavaScript的内置函数

VB的内置函数

一组预定义的函数，这些函数作为 Transact-SQL 和多维表达式 (MDX) 语言的部分而提供。

JavaScript的内置函数

1.数学函数

abs 方法 返回一个数的绝对值。

acos 方法 返回一个数的反余弦。

anchor 方法 在对象的指定文本两端加上一个带 NAME 属性的 HTML 锚点。

asin 方法 返回一个数的反正弦。

atan 方法 返回一个数的反正切。

atan2 方法 返回从 X 轴到点 （y, x）的角度（以弧度为单位）。

cos 方法 返回一个数的余弦。

sin 方法 返回一个数的正弦。

sqrt 方法 返回一个数的平方根。

tan 方法 返回一个数的正切。

round 方法 将一个指定的数值表达式舍入到最近的整数并将其返回。

random 方法 返回一个 0 和 1 之间的伪随机数。

parseFloat 方法 返回从字符串转换而来的浮点数。

parseInt 方法 返回从字符串转换而来的整数。

pow 方法 返回一个指定幂次的底表达式的值。

2.字符串函数

atEnd 方法 返回一个表明枚举算子是否处于集合结束处的 Boolean 值。

big 方法 在String 对象的文本两端加入 HTML 的<BIG>标识。

blink 方法 将 HTML 的<BLINK> 标识添加到 String 对象中的文本两端。

bold 方法 将 HTML 的 <B> 标识添加到String 对象中的文本两端。

ceil 方法 返回大于或等于其数值参数的最小整数。

charAt 方法 返回位于指定索引位置的字符。

charCodeAt 方法 返回指定字符的 Unicode 编码。

compile 方法 将一个正则表达式编译为内部格式。

concat 方法（Array） 返回一个由两个数组合并组成的新数组。

concat 方法（String） 返回一个包含给定的两个字符串的连接的 String 对象。

dimensions 方法 返回 VBArray 的维数。

escape 方法 对 String 对象编码，以便在所有计算机上都能阅读。

eval 方法 对 JScript 代码求值然后执行之。

exec 方法 在指定字符串中执行一个匹配查找。

exp 方法 返回 e （自然对数的底） 的幂。

fixed 方法 将 HTML 的<TT> 标识添加到String 对象中的文本两端。

floor 方法 返回小于或等于其数值参数的最大整数。

fontcolor 方法 将 HTML 带 COLOR 属性的<FONT>标识添加到 String 对象中的文本两端。

fontsize 方法 将 HTML 带 SIZE 属性的<FONT>标识添加到 String 对象中的文本两端。

fromCharCode 方法 返回 Unicode 字符值的字符串。

indexOf 方法 返回在 String 对象中第一次出现子字符串的字符位置。

slice 方法 （Array） 返回数组的一个片段。

slice 方法 （String） 返回字符串的一个片段。

small 方法 将 HTML 的<SMALL>标识添加到 String 对象中的文本两端。

sort 方法 返回一个元素被排序了的 Array 对象。

split 方法 将一个字符串分割为子字符串，然后将结果作为字符串数组返回。 strike 方法 将 HTML 的<STRIKE> 标识添加到String 对象中的文本两端。

sub 方法 将 HTML 的 <SUB> 标识放置到 String 对象中的文本两端。

substr 方法 返回一个从指定位置开始并具有指定长度的子字符串。

substring 方法 返回位于 String 对象中指定位置的子字符串。

sup 方法 将 HTML 的 <SUP> 标识放置到 String 对象中的文本两端。

unescape 方法 对用escape 方法编码的 String 对象进行解码。

UTC 方法 返回 1970年1月1日零点的全球标准时间 （UTC）（或 GMT）与指定日期之间的毫秒数.

valueOf 方法 返回指定对象的原始值。

toLocaleString 方法 返回一个转换为使用当地时间的字符串的日期。

toLowerCase 方法 返回一个所有的字母字符都被转换为小写字母的字符串。

toString 方法 返回一个对象的字符串表示。

toUpperCase 方法 返回一个所有的字母字符都被转换为大写字母的字符串。

toUTCString 方法 返回一个转换为使用全球标准时间（UTC）的字符串的日期。

ubound 方法 返回在 VBArray 的指定维中所使用的最大索引值。

test 方法 返回一个 Boolean 值，表明在被查找的字符串中是否存在某个模式。

toArray 方法 返回一个从 VBArray 转换而来的标准 JScript 数组。

3.日期函数

getDate 方法 使用当地时间返回 Date 对象的月份日期值。

getDay 方法 使用当地时间返回 Date 对象的星期几。

getFullYear 方法 使用当地时间返回 Date 对象的年份。

getHours 方法 使用当地时间返回 Date 对象的小时值。

getItem 方法 返回位于指定位置的项。

getMilliseconds 方法 使用当地时间返回 Date 对象的毫秒值。

getMinutes 方法 使用当地时间返回 Date 对象的分钟值。

getMonth 方法 使用当地时间返回 Date 对象的月份。

getSeconds 方法 使用当地时间返回 Date 对象的秒数。

getTime 方法 返回 Date 对象中的时间。

getTimezoneOffset 方法 返回主机的时间和全球标准时间（UTC）之间的差（以分钟为单位）。

getUTCDate 方法 使用全球标准时间（UTC）返回 Date 对象的日期值。

getUTCDay 方法 使用全球标准时间（UTC）返回 Date 对象的星期几。

getUTCFullYear 方法 使用全球标准时间（UTC）返回 Date 对象的年份。

getUTCHours 方法 使用全球标准时间（UTC）返回Date 对象的小时数。

getUTCMilliseconds 方法 使用全球标准时间（UTC）返回Date 对象的毫秒数。

getUTCMinutes 方法 使用全球标准时间（UTC）返回 Date 对象的分钟数。

getUTCMonth 方法 使用全球标准时间（UTC）返回 Date 对象的月份值。

getUTCSeconds 方法 使用全球标准时间（UTC）返回Date对象的秒数。

getVarDate 方法 返回 Date 对象中的 VT_DATE。

getYear 方法 返回 Date 对象中的年份。

isFinite 方法 返回一个 Boolean 值，表明某个给定的数是否是有穷的。

isNaN 方法 返回一个 Boolean 值，表明某个值是否为保留值 NaN （不是一个数）。

italics 方法 将 HTML的 <I> 标识添加到 String 对象中的文本两端。

item 方法 返回集合中的当前项。

join 方法 返回一个由数组中的所有元素连接在一起的 String 对象。

lastIndexOf 方法 返回在 String 对象中子字符串最后出现的位置。

lbound 方法 返回在 VBArray 中指定维数所用的最小索引值。

link 方法 将带 HREF 属性的 HTML 锚点添加到 String 对象中的文本两端。

log 方法 返回某个数的自然对数。

match 方法 使用给定的正则表达式对象对字符串进行查找，并将结果作为数组返回。

max 方法 返回给定的两个表达式中的较大者。

min 方法 返回给定的两个数中的较小者。

moveFirst 方法 将集合中的当前项设置为第一项。

moveNext 方法 将当前项设置为集合中的下一项。

parse 方法 对包含日期的字符串进行分析，并返回该日期与1970年1月1日零点之间相差的毫秒数。

replace 方法 返回根据正则表达式进行文字替换后的字符串的拷贝。

reverse 方法 返回一个元素反序的 Array 对象。

search 方法 返回与正则表达式查找内容匹配的第一个子字符串的位置。

setDate 方法 使用当地时间设置 Date 对象的数值日期。

setFullYear 方法 使用当地时间设置 Date 对象的年份。

setHours 方法 使用当地时间设置 Date 对象的小时值。

setMilliseconds 方法 使用当地时间设置 Date 对象的毫秒值。

setMinutes 方法 使用当地时间设置 Date 对象的分钟值。

setMonth 方法 使用当地时间设置 Date 对象的月份。

setSeconds 方法 使用当地时间设置 Date 对象的秒值。

setTime 方法 设置 Date 对象的日期和时间。

setUTCDate 方法 使用全球标准时间（UTC）设置 Date 对象的数值日期。

setUTCFullYear 方法 使用全球标准时间（UTC）设置 Date 对象的年份。

setUTCHours 方法 使用全球标准时间（UTC）设置 Date 对象的小时值。

setUTCMilliseconds 方法 使用全球标准时间（UTC）设置 Date 对象的毫秒值。

setUTCMinutes 方法 使用全球标准时间（UTC）设置 Date 对象的分钟值。

setUTCMonth 方法 使用全球标准时间（UTC）设置 Date 对象的月份。

setUTCSeconds 方法 使用全球标准时间（UTC）设置 Date 对象的秒值。

setYear 方法 使用 Date 对象的年份。

toGMTString 方法 返回一个转换为使用格林威治标准时间（GMT）的字符串的日期。

VB的内置函数

Abs(number)

返回参数的绝对值，其类型和参数相同。

必要的 number 参数是任何有效的数值表达式，如果 number 包含 Null，则返回 Null，如果 number 是未初始化的变量，则返回 0。

一个数的绝对值是将正负号去掉以后的值。例如，ABS(-1) 和 ABS(1) 都返回 1。

Array(arglist)

返回一个包含数组的 Variant。

所需的 arglist 参数是一个用逗号隔开的值表，这些值用于给 Variant 所包含的数组的各元素赋值。如果不提供参数，则创建一个长度为 0 的数组。

用来表示数组元素的符号由变量名、圆括号以及括号中的所需元素的索引号组成。在下面的示例中，第一条语句创建一个 Variant 的变量 A。第二条语句将一个数组赋给变量 A。最后一条语句将该数组的第二个元素的值赋给另一个变量。

Dim A As Variant

A = Array(10,20,30)

B = A(2)

使用 Array 函数创建的数组的下界受 Option Base 语句指定的下界的决定, 除非 Array 是由类型库（例如 VBA.Array )名称限定。如果是由类型库名称限定，则 Array 不受 Option Base 的影响。

注意 没有作为数组声明的 Variant 也可以表示数组。除了长度固定的字符串以及用户定义类型之外，Variant 变量可以表示任何类型的数组。尽管一个包含数组的 Variant 和一个元素为 Variant 类型的数组在概念上有所不同，但对数组元素的访问方式是相同的。

Asc(string)

返回一个 Integer，代表字符串中首字母的字符代码。

必要的 string 参数可以是任何有效的字符串表达式。如果 string 中没有包含任何字符，则会产生运行时错误。

在非 DBCS 系统下，返回值范围为 0 – 255 。在 DBCS 系统下，则为 -32768 – 32767。

注意 AscB 函数作用于包含在字符串中的字节数据，AscB 返回第一个字节的字符代码，而非字符的字符代码。AscW 函数返回 Unicode 字符代码，若平台不支持 Unicode，则与 Asc 函数功能相同。

Atn(number)

返回一个 Double，指定一个数的反正切值。

必要的 number 参数是一个 Double或任何有效的数值表达式。

Atn 函数的参数值 (number) 为直角三角形两边的比值并返回以弧度为单位的角。这个比值是角的对边长度除以角的邻边长度之商。

值的范围在 -pi/2 和 pi/2 弧度之间。

为了将角度转换为弧度，请将角度乘以 pi/180。为了将弧度转换为角度，请将弧度乘以 180/pi。

注意 Atn 是 Tan 的反三角函数，Tan 的参数值为角度，返回直角三角形的两条边的比值。不要将 Atn 和余切函数混淆，余切函数值是正切函数值的倒数，cotangent = (1/tangent)。

CallByName(object, procedurename, calltype,[arguments()])

执行一个对象的方法，或者设置或返回一个对象的属性。

object 必需的；变体型（对象）。函数将要执行的对象的名称。

procedurename 必需的；变体型（字符串）。一个包含该对象的属性名称或者方法名称的字符串表达式。

calltype 必需的；常数。一个 vbCallType 类型的常数，代表正在被调用的过程的类型。

arguments() 可选的：变体型（数组）。

CallByName 函数用于获取或者设置一个属性，或者在运行时使用一个字符串名称来调用一个方法。

在下面的例子中，第一行使用 CallByName 来设置一个文本框的 MousePointer 属性，第二行得到 MousePointer 属性的值，第三行调用 Move 方法来移动文本框：

CallByName Text1, "MousePointer", vbLet, vbCrosshair

Result = CallByName (Text1, "MousePointer", vbGet)

CallByName Text1, "Move", vbMethod, 100, 100

Choose(index, choice-1[, choice-2, ... [, choice-n]])

从参数列表中选择并返回一个值。

Choose 函数的语法具有以下几个部分：

index 必要参数，数值表达式或字段，它的运算结果是一个数值，且界于 1 和可选择的项目数之间。

choice 必要参数，Variant 表达式，包含可选择项目的其中之一。

Choose 会根据 index 的值来返回选择项列表中的某个值。如果 index 是 1，则 Choose 会返回列表中的第 1 个选择项。如果 index 是 2，则会返回列表中的第 2 个选择项，以此类推。

可以使用 Choose 来查阅一个列表中的项目。例如，如果 index 所指定的值为 3，而 choice-1 = "one"、choice-2 = "two"、且 choice-3 = "three"，那么 Choose 将返回 "three"。当 index 代表一选项组中的值时，则这项功能将会特别有用。

即使它只返回一个选项值，Choose 仍然会计算列表中的每个选择项。所以应该注意到这项副作用。例如，当在每个选择项表达式中使用了 MsgBox 函数作为其中的一部分时，每计算一个选择项，就会显示一次消息框。

当 index小于 1 或大于列出的选择项数目时，Choose 函数返回 Null。

如果 index 不是整数，则会先四舍五入为与其最接近的整数。

Chr(charcode)

返回 String，其中包含有与指定的字符代码相关的字符 。

Command

返回命令行的参数部分，该命令行用于装入 Microsoft Visual Basic 或 Visual Basic 开发的可执行程序。

当从命令行装入 Visual Basic 时，/cmd 之后的命令行的任何部分作为命令行的参数传递给程序。下面的示例中，cmdlineargs 代表 Command 函数返回的参数信息。

VB /cmd cmdlineargs

对于使用 Visual Basic 开发并编译为 .exe 文件的应用程序，Command 返回出现在命令行中应用程序名之后的任何参数。例如：

MyApp cmdlineargs

Cos(number)

返回一个 Double，指定一个角的余弦值。

CreateObject(class,[servername])

创建并返回一个对 ActiveX 对象的引用。

每个支持自动化的应用程序都至少提供一种对象类型。例如，一个字处理应用程序可能会提供 Application 对象，Document 对象，以及 Toolbar 对象。

要创建 ActiveX 对象，只需将 CreateObject 返回的对象赋给一个对象变量：

'声明一个对象变量来存放该对象

'的引用。Dim as Object 采用后期绑定方式。

Dim ExcelSheet As Object

Set ExcelSheet = CreateObject("Excel.Sheet")

上述代码将启动该应用程序创建该对象，在本例中就是创建一个 Microsoft Excel 电子数据表。对象创建后，就可以在代码中使用自定义的对象变量来引用该对象。在下面的示例中，可以使用对象变量 ExcelSheet 来访问新建对象的属性和方法，以及访问 Microsoft Excel 的其它对象，包括应用程序对象和单元格集合。

'设置 Application 对象使 Excel 可见

ExcelSheet.Application.Visible = True

'在表格的第一个单元中写些文本

ExcelSheet.Cells(1, 1).Value = "This is column A, row 1"

'将该表格保存到 C:\\test.doc 目录

ExcelSheet.SaveAs "C:\\ TEST.DOC"

'使用应用程序对象的 Quit 方法关闭 Excel。

ExcelSheet.Application.Quit

'释放该对象变量

Set ExcelSheet = Nothing

使用 As Object 子句声明对象变量，可以创建一个能包含任何类型对象引用的变量。不过，该变量访问对象是后期绑定的，也就是说，绑定在程序运行时才进行。要创建一个使用前期绑定方式的对象变量，也就是说，在程序编译时就完成绑定，则对象变量在声明时应指定类 ID。例如，可以声明并创建下列 Microsoft Excel 引用：

Dim xlApp As Excel.Application

Dim xlBook As Excel.Workbook

Dim xlSheet As Excel.WorkSheet

Set xlApp = CreateObject("Excel.Application")

Set xlBook = xlApp.Workbooks.Add

Set xlSheet = xlBook.Worksheets(1)

前期绑定的变量引用可以提供更好的性能，但该变量只能存放声明中所指定的类的引用。

可以将 CreateObject 函数返回的对象传给一个参数为对象的函数。例如，下面的代码创建并传递了一个 Excel.Application 对象的引用：

Call MySub (CreateObject("Excel.Application"))

可以在一个远端连网的计算机上创建一个对象，方法是把计算机的名称传递给 CreateObject 的 servername 参数。这个名称与共享名称的机器名部份相同：对于一个共享名称为 "\\\\\\\\MyServer\\\\Public," 的 servername 参数是 "MyServer" 。

下面的代码返回在一个名为 MyServer 的远端计算机上运行的 Excel 实例的版本号：

Dim xlApp As Object

Set xlApp = CreateObject("Excel.Application", "MyServer")

Debug.Print xlApp.Version

如果远端服务器不存在或者不可用，则会发生一个运行时错误。

注意 当该对象当前没有实例时，应使用 CreateObject。如果该对象已有实例在运行，就会启动一个新的实例，并创建一个指定类型的对象。要使用当前实例，或要启动该应用程序并加载一个文件，可以使用 GetObject 函数。

如果对象已登记为单个实例对象，则不管执行多少次 CreateObject，都只能创建该对象的一个实例。

CurDir[(drive)]

返回一个 Variant (String)，用来代表当前的路径。

可选的 drive 参数是一个字符串表达式，它指定一个存在的驱动器。如果没有指定驱动器，或 drive 是零长度字符串 ("")，则 CurDir 会返回当前驱动器的路径。

CVErr(errornumber)

返回 Error 子类型的 Variant，其中包含指定的错误号。

必要的 errornumber 参数可以是任何有效的错误号代码。

可以在过程中，使用 CVErr 函数来创建用户自定义错误。例如，如果创建一个函数，它可以接受若干个参数，且正常返回一个字符串，则可以让函数来判断输入的参数，确认它们是在可接受的范围内。如果不是的话，此函数将不会返回所要的字符串。在这种情况下，CVErr 可以返回一个错误号，并告知应该采取的行动。

注意，Error 的隐式转换是不允许的，例如，不能直接把 CVErr 的返回值赋值给一个非 Variant 的变量。然而，可以对 CVErr 的返回值进行显式转换（使用 CInt、CDbl 等等），并赋值给适当的数据类型变量。

Date

返回包含系统日期的 Variant (Date)。

DateAdd(interval, number, date)

返回包含一个日期的 Variant (Date)，这一日期还加上了一段时间间隔。

DateAdd 函数语法中有下列命名参数：

interval 必要。字符串表达式，是所要加上去的时间间隔。

number 必要。数值表达式，是要加上的时间间隔的数目。其数值可以为正数（得到未来的日期），也可以为负数（得到过去的日期）。

date 必要。Variant (Date) 或表示日期的文字，这一日期还加上了时间间隔。

interval 参数具有以下设定值：

yyyy 年

q 季

m 月

y 一年的日数

d 日

w 一周的日数

ww 周

h 时

n 分钟

s 秒

可以使用 DateAdd 函数对日期加上或减去指定的时间间隔。例如，可以用 DateAdd 来计算距今天为三十天的日期；或者计算距现在为 45 分钟的时间。

为了对 date 加上“日”，可以使用“一年的日数” (“y”)，“日” (”d”) 或“一周的日数” (”w”)。

DateAdd 函数将不返回有效日期。在以下实例中将 1 月31 日加上一个月：

DateAdd(m, 1, 31-Jan-95)

上例中，DateAdd 返回 1995 年 2 月 28 日，而不是 1995 年 2 月 31 日。如果 date 是 1996 年 1 月 31 日，则由于 1996 年是闰年，返回值是 1996 年 2 月 29 日。

如果计算的日期超前 100 年（减去的年度超过 date 中的年份），就会导致错误发生。

如果 number 不是一个 Long 值，则在计算时取最接近的整数值来计算。

注意 DateAdd 返回值的格式由 Control Panel设置决定，而不是由传递到date 参数的格式决定。

DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])

返回 Variant (Long) 的值，表示两个指定日期间的时间间隔数目。

interval设置同上

firstdayofweek 参数的设定值如下：

常数 值 描述

vbUseSystem 0 使用 NLS API 设置。

vbSunday 1 星期日（缺省值）

vbMonday 2 星期一

vbTuesday 3 星期二

vbWednesday 4 星期三

vbThursday 5 星期四

vbFriday 6 星期五

vbSaturday 7 星期六

常数 值 描述

vbUseSystem 0 用 NLS API 设置。

vbFirstJan1 1 从包含 1 月 1 日的星期开始（缺省值）。

vbFirstFourDays 2 从第一个其大半个星期在新的一年的一周开始。

vbFirstFullWeek 3 从第一个无跨年度的星期开始。

DatePart(interval, date[,firstdayofweek[, firstweekofyear]])

返回一个包含已知日期的指定时间部分的 Variant (Integer)。

DatePart 函数可以用来计算日期并返回指定的时间间隔。例如，可以使用DatePart 计算某个日期是星期几或目前为几点钟。

firstdayofweek 参数会影响使用时间间隔符号 “W” 或 “WW” 计算的结果。

如果 date 是日期文字，则指定的年份成为该日期的固定部分。但是，如果 date 用双引号 (" ") 括起来，且年份略而不提，则在每次计算 date 表达式时，当前年份都会插入到代码之中。这样就可以书写适用于不同年份的程序代码。

DateSerial(year, month, day)

返回包含指定的年、月、日的 Variant (Date)。

为了指定某个日期，如 1991 年 12 月 31 日，DateSerial 函数中的每个参数的取值范围应该是可接受的；即，日的取值范围应在 1-31 之间，而月的取值范围应在 1-12 之间。但是，当一个数值表达式表示某日之前或其后的年、月、日数时，也可以为每个使用这个数值表达式的参数指定相对日期。

以下示例中使用了数值表达式代替绝对日期。这里，DateSerial 函数返回 1990 年 8 月 1 日的 十 年 (1990 - 10) 零两个月 (8 - 2) 又一天 (1 - 1) 之前的日期；换句话说，就是 1980 年 5 月 31 日。

DateSerial(1990 - 10, 8 - 2, 1 - 1)

year 参数的数值若介于 0 与 29 之间，则将其解释为 2000–2029年，若介于 30 和 99 之间则解释为1930–1999年。而对所有其它 year 参数，则请用四位数值表示（如 1800）。

当任何一个参数的取值超出可接受的范围时，它会适时进位到下一个较大的时间单位。例如，如果指定了 35 天，则这个天数被解释成一个月加上多出来的日数，多出来的日数将由其年份与月份来决定。如果一个参数值超出 -32，768 到 32，767 的范围，就会导致错误发生。

DateValue(date)

返回一个 Variant (Date)。

Day(date)

返回一个 Variant (Integer)，其值为 1 到 31 之间的整数，表示一个月中的某一日。

DDB(cost, salvage, life, period[, factor])

返回一个 Double，指定一笔资产在一特定期间内的折旧。可使用双下落收复平衡方法或其它指定的方法进行计算。

Dir[(pathname[, attributes])]

返回一个 String，用以表示一个文件名、目录名或文件夹名称，它必须与指定的模式或文件属性、或磁盘卷标相匹配。

Dir 函数的语法具有以下几个部分：

部分 描述

pathname 可选参数。用来指定文件名的字符串表达式，可能包含目录或文件夹、以及驱动器。如果没有找到 pathname，则会返回零长度字符串 ("")。

attributes 可选参数。常数或数值表达式，其总和用来指定文件属性。如果省略，则会返回匹配 pathname 但不包含属性的文件。

attributes 参数的设置可为：

常数 值 描述

vbNormal 0 (缺省) 指定没有属性的文件。

vbReadOnly 1 指定无属性的只读文件

vbHidden 2 指定无属性的隐藏文件

VbSystem 4 指定无属性的系统文件

vbVolume 8 指定卷标文件；如果指定了其它属性，则忽略vbVolume

vbDirectory 16 指定无属性文件及其路径和文件夹。

注意 这些常数是由 VBA 所指定的，在程序代码中的任何位置，可以使用这些常数来替换真正的数值。

Dir 支持多字符 (*) 和单字符 (?) 的通配符来指定多重文件。

由于 Macintosh 不支持通配符，使用文件类型指定文件组。可以使用 MacID 函数指定文件类型而不用文件名。比如，下列语句返回当前文件夹中第一个TEXT文件的名称:

Dir("SomePath", MacID("TEXT"))

为选中文件夹中所有文件，指定一空串:

Dir("")

在 Microsoft Windows 中，如果在Dir函数中使用MacID函数，将产生错误。

任何大于256的attribute值都被认为是MacID 函数的值。

在第一次调用 Dir 函数时，必须指定 pathname，否则会产生错误。如果也指定了文件属性，那么就必须包括 pathname。

Dir 会返回匹配 pathname 的第一个文件名。若想得到其它匹配 pathname 的文件名，再一次调用 Dir，且不要使用参数。如果已没有合乎条件的文件，则 Dir 会返回一个零长度字符串 ("")。一旦返回值为零长度字符串，并要再次调用 Dir 时，就必须指定 pathname，否则会产生错误。不必访问到所有匹配当前 pathname 的文件名，就可以改变到一个新的 pathname 上。但是，不能以递归方式来调用 Dir 函数。以 vbDirectory 属性来调用 Dir 不能连续地返回子目录。

提示 由于文件名并不会以特别的次序来返回，所以可以将文件名存储在一个数组中，然后再对这个数组排序。

DoEvents( )

转让控制权，以便让操作系统处理其它的事件。

Environ({envstring | number})

返回 String，它关连于一个操作系统环境变量。 在 Macintosh 中不可用

如果在环境字符串表格中找不到 envstring，则会返回一个零长度字符串 ("")。如果找到，则 Environ 会返回一段文本，文本是赋值给指定的 envstring 的，也就是说，在环境字符串表格中对应那个环境变量的等号 (=) 后面的那段文本。

如果指定了 number，则在环境字符串表格中相应位置上的字符串会返回。在这种情况下，Environ 会返回整个文本，包括 envstring。如果在指定位置上没有环境字符串，那么 Environ 会返回一个零长度字符串。

EOF(filenumber)

返回一个 Integer，它包含 Boolean 值 True，表明已经到达为 Random 或顺序 Input 打开的文件的结尾。

Error[(errornumber)]

返回对应于已知错误号的错误信息。

Exp(number)

返回 Double，指定 e（自然对数的底）的某次方。

FileAttr(filenumber, returntype)

返回一个 Long，表示使用 Open 语句所打开文件的文件方式。

FileAttr 函数的语法具有以下几个命名参数：

filenumber 必要。Integer 类型，任何有效的文件号。

returntype 必要。Integer 类型。它是数字，指出返回信息的类型。指定 1 则可返回一个代表文件方式的数值。而仅仅在 16 位系统中， 指定 2 才可以恢复操作系统的文件句柄。在 32 位系统中不支持 Returntype 2，它会导致错误发生。

当 returntype 参数值为 1 时，下列返回值指出文件访问方式：

方式 值

Input 1

Output 2

Random 4

Append 8

Binary 32

FileDateTime(pathname)

返回一个 Variant (Date)，此为一个文件被创建或最后修改后的日期和时间。

FileLen(pathname)

返回一个 Long，代表一个文件的长度，单位是字节。

Filter(InputStrings, Value[, Include[, Compare]])

返回一个下标从零开始的数组，该数组包含基于指定筛选条件的一个字符串数组的子集。

Filter函数语法有如下几部分：

InputStrings 必需的。要执行搜索的一维字符串数组。

Value 必需的。要搜索的字符串。

Include 可选的。Boolean值，表示返回子串包含还是不包含Value字符串。如果Include是True，Filter返回的是包含Value子字符串的数组子集。如果Include是False，Filter返回的是不包含Value子字符串的数组子集。

Compare 可选的。数字值，表示所使用的字符串比较类型。有关其设置，请参阅下面的“设置值”部分。

Compare参数的设置值如下：

常数 值 描述

vbUseCompareOption –1 使用Option Compare语句的设置值来执行比较。

vbBinaryCompare 0 执行二进制比较。

vbTextCompare 1 执行文字比较。

vbDatabaseCompare 2 只用于Microsoft Access。基于您的数据库信息来执行比较。

如果在InputStrings中没有发现与Value相匹配的值，Filter返回一个空数组。如果InputStrings是Null或不是一个一维数组，则产生错误。

Filter函数所返回的数组，其元素数目刚好是所找到的匹配项目数。

Format(expression[, format[, firstdayofweek[, firstweekofyear]]])

返回 Variant (String)，其中含有一个表达式，它是根据格式表达式中的指令来格式化的。

expression 必要参数。任何有效的表达式。

format 可选参数。有效的命名表达式或用户自定义格式表达式。

firstdayofweek 可选参数。常数，表示一星期的第一天。

firstweekofyear 可选参数。常数，表示一年的第一周。

设置值

firstdayofweek 参数有下面设置：

常数 值 说明

vbUseSystem 0 使用 NLS API 设置。

VbSunday 1 星期日（缺省）

vbMonday 2 星期一

vbTuesday 3 星期二

vbWednesday 4 星期三

vbThursday 5 星期四

vbFriday 6 星期五

vbSaturday 7 星期六

firstweekofyear 参数有下面设置：

常数 值 说明

vbUseSystem 0 使用 NLS API 设置。

vbFirstJan1 1 从包含一月一日的那一周开始（缺省）。

vbFirstFourDays 2 从本年第一周开始，而此周至少有四天在本年中。

VbFirstFullWeek 3 从本年第一周开始，而此周完全在本年中。

说明

格式化 作法

数字 使用预先定义的命名数值格式或创建用户自定义数值格式。

日期和时间 使用预先定义的命名日期/时间格式或创建用户自定义日期/时间格式。

日期和时间序数 使用日期和时间格式或数值格式。

字符串 创建自定义的字符串格式。

如果在格式化数字时没有指定 format，Format 会提供与 Str 函数类似的功能，尽管它是国际化的。然而，以 Format 作用在正数上不会保留正负号空间，而以 Str 的话则会。

FormatCurrency(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]])

返回一个货币值格式的表达式，它使用系统控制面板中定义的货币符号。

Expression 必需的。要格式化的表达式。

NumDigitsAfterDecimal 可选的。数字值，表示小数点右边的显示位数。缺省值为–1，表示使用计算机的区域设置值。

IncludeLeadingDigit 可选的。三态常数，表示小数点前是否显示一个零。关于其值，请参阅“设置值”部分。

UseParensForNegativeNumbers 可选的。三态常数，表示是否把负数值放在园括号内。关于其值，请参阅“设置值”部分。

GroupDigits 可选的。三态常数，表示是否用组分隔符对数字进行分组，组分隔符由计算机的区域设置值指定。关于其值，请参阅“设置值”部分。

设置值

IncludeLeadingDigit、UseParensForNegativeNumbers 和 GroupDigits参数的设置值如下：

常数 值 描述

TristateTrue –1 True

TristateFalse 0 False

TristateUseDefault –2 使用计算机区域设置中的设置值。

说明

当忽略一个或多个选项参数时，被忽略的参数值由计算机的区域设置值提供。

货币符号相对货币值的位置由计算机的区域设置值确定。

注意 除起始的零外，所有设置值信息都来自“区域设置”的“货币”选项卡，起始的零来自“数字”选项卡。

FormatDateTime(Date[,NamedFormat])

返回一个日期或时间格式的表达式。

FormatDateTime函数语法有如下几部分：

部分 描述

Date 必需的。要被格式化的日期表达式。

NamedFormat 可选的。数字值，表示日期/时间所使用的格式。如果忽略该值，则使用vbGeneralDate。

设置值

NamedFormat参数的设置值如下：

常数 值 描述

vbGeneralDate 0 显示日期和/或时间。如果有日期部分，则用短日期格式显示。如果有时间部分，则用长时间格式显示。如果都有，两部分都显示。

vbLongDate 1 用计算机区域设置值中指定的长日期格式显示日期。

vbShortDate 2 用计算机区域设置值中指定的短日期格式显示日期。

vbLongTime 3 用计算机区域设置值中指定的时间格式显示时间。

vbShortTime 4 用24小时格式（hh：mm）显示时间。

FormatNumber(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]])

返回一个数字格式的表达式。

FormatNumber函数语法有如下几部分：

部分 描述

Expression 必需的。要被格式化的表达式。

NumDigitsAfterDecimal 可选的。数字值，表示小数点右边的显示位数。缺省值为–1，表示使用计算机的区域设置值。

IncludeLeadingDigit 可选的。三态常数，表示小数点前是否显示零。关于其值，请参阅“设置值”部分。

UseParensForNegativeNumbers 可选的。三态常数，表示是否把负数值放在圆括号内。关于其值，请参阅“设置值”部分。

GroupDigits 可选的。的三态常数，表示是否用组分隔符对数字分组，组分隔符在计算机的区域设置值中指定。关于其值，请参阅“设置值”部分。

设置值

IncludeLeadingDigit、UseParensForNegativeNumbers和GroupDigits参数的设置值如下：

常数 值 描述

TristateTrue –1 True

TristateFalse 0 False

TristateUseDefault –2 用计算机区域设置值中的设置值。

说明

当忽略一个或多个选项参数时，被忽略的参数值由计算机的区域设置值提供。

注意 所有设置值信息都来自“区域设置”的“数字”选项卡。

FormatPercent(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]])

返回一个百分比格式（乘以100）的表达式，后面有%符号。

FormatPercent函数语法有如下几部分：

部分 描述

Expression 必需的。要格式化的表达式。

NumDigitsAfterDecimal 可选的。表示小数点右边的显示位数。缺省值为–1，表示使用计算机的区域设置值。

IncludeLeadingDigit 可选的。三态常数，表示小数点前是否显示零。关于其值，请参阅“设置值”部分。

UseParensForNegativeNumbers 可选的。三态常数，表示是否把负数放在圆括号内。关于其值，请参阅“设置值”部分。

GroupDigits 可选的。三态常数，表示是否用组分隔符对数字进行分组，组分隔符在计算机的区域设置值中指定。关于其值，请参阅“设置值”部分。

设置值

IncludeLeadingDigit、UseParensForNegativeNumbers和GroupDigits参数的设置值如下：

常数 值 描述

TristateTrue –1 True

TristateFalse 0 False

TristateUseDefault –2 使用计算机区域设置值中的设置值。

说明

当忽略一个或多个选项参数时，被忽略的参数值由计算机的区域设置值提供。

注意 所有的设置值信息都来自“区域设置”的“数字”选项卡。

FreeFile[(rangenumber)]

返回一个 Integer，代表下一个可供 Open 语句使用的文件号。

FV(rate, nper, pmt[, pv[, type]])

返回一个 Double，指定未来的定期定额支付且利率固定的年金。

GetAllSettings(appname, section)

从 Windows 注册表中返回应用程序项目的所有注册表项设置及其相应值（开始是由 SaveSetting 产生）。

GetAttr(pathname)

返回一个 Integer，此为一个文件、目录、或文件夹的属性。

由 GetAttr 返回的值，是下面这些属性值的总和：

vbNormal 0 常规

vbReadOnly 1 只读

vbHidden 2 隐藏

vbSystem 4 系统文件

vbDirectory 16 目录或文件夹

vbArchive 32 上次备份以后，文件已经改变

vbalias 64 指定的文件名是别名。

注意 这些常数是由 VBA 指定的，在程序代码中的任何位置，可以使用这些常数来替换真正的值。

若要判断是否设置了某个属性，在 GetAttr 函数与想要得知的属性值之间使用 And 运算符与逐位比较。如果所得的结果不为零，则表示设置了这个属性值。例如，在下面的 And 表达式中，如果档案 (Archive) 属性没有设置，则返回值为零：

Result = GetAttr(FName) And vbArchive

如果文件的档案属性已设置，则返回非零的数值。

object.GetAutoServerSettings([progid], [clsid])

返回关于 ActiveX 部件的注册状态的信息。

GetObject([pathname] [, class])

返回文件中的 ActiveX 对象的引用。

GetSetting(appname, section, key[, default])

从 Windows 注册表中的应用程序项目返回注册表项设置值。

Hex(number)

返回代表十六进制数值的 String。

Hour(time)

返回一个 Variant (Integer)，其值为 0 到 23 之间的整数，表示一天之中的某一钟点。

IIf(expr, truepart, falsepart)

根据表达式的值，来返回两部分中的其中一个。

IMEStatus

返回一个 Integer，用来指定当前 Microsoft Windows 的输入法 (IME) 方式；只对东亚区版本有效。

下面是日本国别的返回值：

常数 值 描述

vbIMEModeNoControl 0 不控制IME（缺省）

vbIMEModeOn 1 打开 IME

vbIMEModeOff 2 关闭 IME

vbIMEModeDisable 3 IME 无效

vbIMEModeHiragana 4 完整宽度 Hiragana 模式

vbIMEModeKatakana 5 完整宽度 Katakana 片假名模式

vbIMEModeKatakanaHalf mode 6 半宽 Katakana 模式

vbIMEModeAlphaFull mode 7 完整宽度 Alphanumeric 模式

vbIMEModeAlpha mode 8 半宽 Alphanumeric 模式

下面是韩国地区的返回值：

常数 值 描述

vbIMEModeAlphaFull 7 完整宽度 Alphanumeric 模式

vbIMEModeAlpha 8 半宽 Alphanumeric 模式

vbIMEModeHangulFull 9 完整宽度 Hangul 模式

vbIMEModeHangul 10 半宽 Hangul 模式

下面是中文地区的返回值：

常数 值 描述

vbIMEModeNoControl 0 不控制IME（缺省）

vbIMEModeOn 1 打开 IME

vbIMEModeOff 2 关闭 IME

Input(number, [#]filenumber)

返回 String，它包含以 Input 或 Binary 方式打开的文件中的字符。

InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])

在一对话框来中显示提示，等待用户输入正文或按下按钮，并返回包含文本框内容的 String。

InStr([start, ]string1, string2[, compare])

返回 Variant (Long)，指定一字符串在另一字符串中最先出现的位置。

InstrRev(string1, string2[, start[, compare]])

返回一个字符串在另一个字符串中出现的位置，从字符串的末尾算起。

Int(number)或Fix(number)

返回参数的整数部分。

IPmt(rate, per, nper, pv[, fv[, type]])

返回一个 Double，指定在一段时间内对定期定额支付且利率固定的年金所支付的利息值。

IRR(values()[, guess])

返回一个 Double，指定一系列周期性现金流（支出或收入）的内部利率。

数学函数公式:

Secant（正割） Sec(X) = 1 / Cos(X)

Cosecant（余割） Cosec(X) = 1 / Sin(X)

Cotangent（余切） Cotan(X) = 1 / Tan(X)

Inverse Sine

（反正弦）

Arcsin(X) = Atn(X / Sqr(-X * X + 1))

Inverse Cosine

（反余弦）

Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)

Inverse Secant

（反正割）

Arcsec(X) = Atn(X / Sqr(X * X - 1)) + Sgn((X) - 1) * (2 * Atn(1))

Inverse Cosecant

（反余割）

Arccosec(X) = Atn(X / Sqr(X * X - 1)) + (Sgn(X) - 1) * (2 * Atn(1))

Inverse Cotangent

（反余切）

Arccotan(X) = Atn(X) + 2 * Atn(1)

Hyperbolic Sine

（双曲正弦）

HSin(X) = (Exp(X) - Exp(-X)) / 2

Hyperbolic Cosine

（双曲余弦）

HCos(X) = (Exp(X) + Exp(-X)) / 2

Hyperbolic Tangent

（双曲正切）

HTan(X) = (Exp(X) - Exp(-X)) / (Exp(X) + Exp(-X))

Hyperbolic Secant

（双曲正割）

HSec(X) = 2 / (Exp(X) + Exp(-X))

Hyperbolic Cosecant（双曲余割） HCosec(X) = 2 / (Exp(X) - Exp(-X))

Hyperbolic Cotangent（双曲余切） HCotan(X) = (Exp(X) + Exp(-X)) / (Exp(X) - Exp(-X))

Inverse Hyperbolic Sine（反双曲正弦） HArcsin(X) = Log(X + Sqr(X * X + 1))

Inverse Hyperbolic Cosine（反双曲余弦） HArccos(X) = Log(X + Sqr(X * X - 1))

Inverse Hyperbolic Tangent（反双曲正切） HArctan(X) = Log((1 + X) / (1 - X)) / 2

Inverse Hyperbolic Secant（反双曲正割） HArcsec(X) = Log((Sqr(-X * X + 1) + 1) / X)

Inverse Hyperbolic Cosecant HArccosec(X) = Log((Sgn(X) * Sqr(X * X + 1) + 1) / X)

Inverse Hyperbolic Cotangent

（反双曲余切）

HArccotan(X) = Log((X + 1) / (X - 1)) / 2

以 N 为底的对数 LogN(X) = Log(X) / Log(N)

Abs(number)

返回参数的绝对值，其类型和参数相同。

必要的 number 参数是任何有效的数值表达式，如果 number 包含 Null，则返回 Null，如果 number 是未初始化的变量，则返回 0。

一个数的绝对值是将正负号去掉以后的值。例如，ABS(-1) 和 ABS(1) 都返回 1。

Array(arglist)

返回一个包含数组的 Variant。

所需的 arglist 参数是一个用逗号隔开的值表，这些值用于给 Variant 所包含的数组的各元素赋值。如果不提供参数，则创建一个长度为 0 的数组。

用来表示数组元素的符号由变量名、圆括号以及括号中的所需元素的索引号组成。在下面的示例中，第一条语句创建一个 Variant 的变量 A。第二条语句将一个数组赋给变量 A。最后一条语句将该数组的第二个元素的值赋给另一个变量。