VB常用函数用法详解.doc

VB函数
数学函数
（1） Abs 函数 语法：Abs(number) 绝对值
返回一数值的绝对值。
参数 number 可以是任何数值表达式。如果 number 的值为 Null，则返回 Null；如果其参数是没有初始值的变数，则返回0。
注解：一个数值的绝对值就是将正负号去掉以后的值。例如 Abs(-1) 和 Abs(1) 的返回值都是1。
（2） Atn 函数
语法：Atn(number) 反正切
该函数返回参数的「反正切」(arctangent) 值。
参数 number 可以是任何有效的数值表达式。
注解：Atn 函数的参数 (number) 是直角三角形中构成直角两边的比值(正切函数值)，其返回值则为相对应之底角的度数，
以「弧度」为单位。正切函数值 (number) 的算法为「对边除以邻边」。
返回值的范围落在 pi/2 到 pi/2 的「弧度」之间。
「角度」与「弧度」的转换方法为：将「角度」乘以 pi/180 即为「弧度」。反过来将「弧度」乘以180/pi 便得「角度」。
（3） Cos 函数余弦函数
语法：Cos(number)
该函数返回一角度的 cosine (余弦函数)值。 参数 number 可以是任何有效的数值表达式，其值代表一个角度，以「弧度」为单位。
注解：Cos 函数的参数表示角度，返回值为该角度两邻边的比值。其比值的定义为「连接另一锐角的邻边除以连接直
角的邻边」。
返回值的范围在 -1 到 1 之间。
（4） Exp 函数
语法：Exp(number) 自然对数之底数
该函数返回 e(自然对数之底数)的某次方。
参数 number 可以是任何的数值表达式。
注解：如果 number 的值超过 709.782712893，会产生程式错误。常数 e 的值大约是 2.718282。
（5） Log 函数自然对数值
语法：返回参数的自然对数值。
Log(number)
参数 number可以是任何的数值表达式，条件是参数值必须大于 0。
注解：自然对数是以 e 为底数的对数。常数 e 的值大约是 2.718282。
VB函数
（6） Rnd 函数随机数
语法：Rnd[(number)]
返回一个随机数。 参数 number 可以是任何的数值表达式。
注解：Rnd 函数返回的随机数范围是：介于 0 和 1 之间，可等于 0，但不等于 1。
number 的值会影响 Rnd 返回的随机数，见下表：

若想产生在某个范围内(非 0 到 1)的整数乱数值，可使用下列公式：
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
上述公式中，upperbound 是随机范围的上限，而 lowerbound 则是随机的下限。
附注：若想得到重复的随机序列，可以在调用 Randomize 之前先调用 Rnd 并且传入一个小于 0 的参数值。用同样的随
机种子调用 Randomize 两次的话，并不会得到两次相同的乱数序列。
（7） Round 函数四舍五入
语法：Round(expression[, numdecimalplaces])
返回一个被四舍五入到某个小数位的数值。
Round 函数的语法包含以下的组成部分：
Expression为必须项。要被四舍五入的数值表达式。

numdecimalplaces 为可选项。此数字表示要四舍五入至小数下第几位。如果省略，Round 函数将返回整数。
（8） Sgn 函数整数代表参数的正负号
语法：Sgn(number)
返回一个整数代表参数的正负号。
参数 number 可以是任何的数值表达式。
Sgn 函数有下列返回值：
VB函数
（9） 函数正弦函数
语法：Sin(number)
返回参数的 sine (正弦函数)值。
Sin(number),number的值为弧度值，所以在使用的时候需要将角度转化为弧度，转化方法为：角度值*π/180°=弧度（原理：弧度=弧长/半径=l/r,因此，若弧度=π，弧长=πr=圆周的一半，此时恰好为一个半圆，圆心角180，也就是说π=180，1°=π/180，例如30°对应的弧度为30*π/180=30*π/180.

SinA=a/c
cosA=b/c
tanA=a/b
cotA=b/a
表示坐标（X,Y）的线与X轴间的夹角的对应的正玄值，即坐标点到X轴的直线距离与坐标点到坐标点（0,0）的距离的比值，如上图所示。
参数 number 可以是任何的数值表达式，其值代表一个角度，以弧度为单位。 注解：Sin 函数的参数值代表一个角度，其返回值为该角度之「另一锐角之邻边除以对边」的值。返回值的范围
在 -1 到 1 之间。
（10） Sqr 函数参数的平方根
语法：Sqr(number)
返回参数的平方根。
参数 number 可以是任何的数值表达式，只要参数值大于或等于 0 即可。
（11） Tan 函数正切
语法：Tan(number)
返回参数的「正切」( tangent) 函数值。
参数 number 可以是任何的数值表达式，其值代表一个角度，以「弧度」为单位。
注解：Tan 的参数值代表一个角度，其返回值为其「对边除以连接直角的邻边」的值。
字符串函数
（12） （1）Asc 函数
语法：Asc(string)
该函数返回字符串中第一个字母的 ANSI 码。
参数 string 是任何可用的字符串表达式。若是 string 中没有包含任何字元，则会产生执行阶段错误。 注解：AscB 函数是用来处理包含二进制的字符串， AscB 函数会返回第一个位元素，而非第一个字元的字元码。 AscW 函数则是为了使用 Unicode 字元码的 32 位元作业平台而设计的。此函数会返回Unicode 字元码，而避免
将 ANSI 码转换为 Unicode 码处理。
（13） （2）InStr 函数一字符串的最先出现位置
语法：InStr([start, ]string1, string2[, compare])
该函数返回在某字符串中一字符串的最先出现位置。
InStr 函数语法有下列的参数：
start 为可选项。为一数值表达式，用来设定每次搜寻的起点。如果省略，将从第一个字元开始。如果 start 所含为 Null，将发生错误。如果有compare 参数，则一定要有 start 参数。
string1为必须项。欲进行搜寻的字符串。
string2 为必须项。欲搜寻的字符串。
compare为可选项。设定字符串比较种类。如果省略compare，将进行二进制比较。 参数 compare 的设定值如下：

（14） （3）InstrRev函数返回在某字符串中一字符串的最先出现位置
语法：InstrRev(string1, string2[, start[, compare]])
返回在某字符串中一字符串的最先出现位置，从尾端开始搜寻。

InstrRev 函数语法有下列几部份：
string1为必须项。欲进行搜寻的字符串表达式。 string2为必须项。欲搜寻的字符串表达式。
Start为可选项。为一数值表达式，用来设定每次搜寻的起点。如果省略，则为 -1，代表将从最后一个字符开始。如果 start 所含为 Null，将发生错误。

（4）Lcase函数换成小写并返回
语法：LCase(string)
将 String转换成小写并返回
参数 string 可以是任何字符串表达式。如果 string 所含为 Null，将返回 Null。
注解：只有大写的字母会转成小写；所有小写字母和非字母字符保持不变。
（15） （5）Left 函数
语法：Left(string, length)
返回一字符串由左算起特定数量的字符。
Left 函数语法有下列的参数：
String参数，为函数欲执行的字符串表达式。如果 string 所含为 Null，将返回 Null。
length 数值表达式，指出欲返回左方多少个字符。如果为 0，返回零长度 ("")。如果大于或等于string 的字符数，则返回整个字符串。
注解：要知道 string 的字符数，请用 Len 函数。
附注：LeftB 函数是使用在位元组字符串上。所以此时 length 代表的是位元组数，而非字符数。
（16） （6）Len 函数返回字符串内字符的数目
语法：Len(string | varname)
返回字符串内字符的数目，或是返回储存一变数所需的位数。
Len 函数语法有下列几部份：
string 为任何正确的字符串表达式。如果 string 所含为 Null，则返回 Null。
varname 为任何正确的变数名称。如果 varname 所含为 Null，则返回 Null。
（17） （7）LTrim、RTrim，与 Trim 函数删除字符串前后的空白
语法：LTrim(string)
RTrim(string)
Trim(string)
将给定字符串的前头空白 (LTrim)、后面空白 (RTrim)、或前后空白 (Trim) 删除后返回。
参数 string 可以是任何字符串表达式。如果 string 所含为 Null，则返回 Null。
（18） （8）Mid 函数一个字符串的某一位置向后返回特定数量字符
语法：Mid(string, start[, length])
从一个字符串的某一位置向后返回特定数量字符。
Mid 函数语法有下列的参数：
string 字符串表达式。如果 string 所含为 Null，则返回 Null。 start 欲返回字符串在 string 之开头位置。如果 start 超过 string 的范围， Mid 则返回零长度字符串 ("")。
length 即返回的字符数。如果省略或 length 超过可以返回的字符数，(包括 start 处的字元)，那将返回从 start 到尾端的所有字符数。
下面的示例利用 Mid 函数返回字符串中从第四个字符开始的六个字符： Dim MyVar
MyVar = Mid("VB脚本is fun!", 4, 6) 'MyVar 包含 "Script"。
注意 MidB 函数与包含在字符串中的字节数据一起使用。其参数不是指定字符数，而是字节数。 例：
M=4100
A1=Mid(M,1,1) A1=4
A2=Mid(M,2,2) A2=10
注解：string 的字符数，可用 Len 函数。
（19） （9）Replace 函数
语法：Replace(expression, find, replacewith[, start[, count[, compare]]])
返回一个字符串，表示字符中的一个特定子字符串已经被另一个子字符串取代的次数。
Replace 函数的语法包含以下的组成部分：
Expression为必须项。字符串表达式，包含了要被取代的子字符串。
find为必须项。要被搜寻的子字符串。
replacewith为必须项。用来取代的子字符串。
start为必须项。在 expression 中，子字符串搜寻动作的开始位置。如果省略，则预设为 1。
Count为 可选项。表示子字符串取代的执行次数。如果省略，默认值为 -1，表示将执行所有可能的取代动作。 compare 为可选项。指定子字符串比对的种类。
compare 参数的设定值如下：

注解：Replace 函数的返回值是一个字符串，而这个字符串已进行过取代动作。而取代动作是从 start 所决定的位置开始，
在 expression 字符串的结尾停止执行。这个字符串不是原始字符串从头到尾的复制。
（20） （10）Right 函数返回一字符串右边特定数量的字符
语法：Right(string, length)
返回一字符串右边特定数量的字符。
Right 函数语法有下列的参数：
string 字符串表达式，为函数欲执行的字符串表达式。如果 string 所含为 Null，则返回 Null。
length 数值表达式，指出欲返回右方多少字符。如果为 0，返回零长度("")。如果大于或等于string 的字元数，则返回整个字符串。
注解：要知道 string 的字符数，可用 Len 函数。
（21） （11）Str 函数返回代表一数值的 Variant (String)
语法：Str(number)
返回代表一数值的 Variant (String)。 注解：必要的 number 参数为一 Long，其中可包含任何有效的数值表达式。
当一数字转成字符串时，总会在前头保留一空位来表示正负。如果 number 为正，返回的字符串包含一前导空格暗示有一正号。
使用 Format 函数可将数值转成必要的格式，如日期、时间、货币或其他用户自定义格式。与 Str不同的是，Format 函数不包含前导空格来放置 number 的正负号。
附注：Str 函数只视句点 (.) 为有效的小数点。如果使用不同的小数点（例如，国际
性的应用程序），可使用 CStr 将数字转成字符串。
（22） （12）StrComp 函数
语法：StrComp(string1, string2[, compare])
返回一值，代表字符串比较的结果。
StrComp 函数语法有下列的参数：
string1 为必须项。任何正确的字符串表达式。
string2为必须项。任何正确的字符串表达式。
compare 为可选项。指定字符串比对的型态。如果省略，则进行二进制比较。
参数 compare 的设定值如下：

StrComp 函数有下列返回值：

（23） （13）string（n,c）创建首字母N次
语法：String(len, character)
String(3,”ABCD”),结果“AAA”
创建含有len个字符的字符串。
String 函数语法有下列的参数： len 为欲返回之字符串长度。如果 len 的值为 Null，则返回 Null。
character 字符码 (代表某特定字元) 或字符串表达式(使用其第一个字元)，将用来建构返回字符串的特定字符。如果 character 的值为 Null，则返回 Null。
注解：如果您设定 character 的数值大于255，String 会以下面式子将之转为正确的字符码：
character Mod 256
（24） （14）StrReverse将字符串翻转
语法：StrReverse(string1)
将特定字符串的字元顺序颠倒后返回。
string1 参数是要颠倒的字符串。如果 string1 的长度为零 ("")，将返回一空字符串。如果string1 是 Null，将会产生错误。
（25） （15）UCase 函数字符串转换成大写并返回
语法：UCase(string)
将字符串转换成大写并返回。
参数 string 可以是任何字符串表达式。如果 string 所含为 Null，则返回 Null。
注解：只有小写的字母会转成大写；原本大写或非字母保持不变。
格式转换函数
（26） （1）CBool 转换为逻辑函数
语法：CBool(expression)
该函数将参数expression转换为 Boolean型并返回。
参数可以是任何有效的表达式。
注解：如果 expression 的结果为 0 ，则返回 False；否则将返回 True。如果 expression 无法被计算成数值，将会产生执行阶段错误。
（27） （2）CByte 函数
语法：CByte(expression)
该函数将参数expression转换为 Byte 类型并返回。
参数 expression 可以是任何有效的表达式。
注解：使用 CByte 来强制执行 Byte 运算，不管它是单精数、倍精数、或是整数，都可以正常执行。 使用 CByte 函数可以在任何语言的版本中，让任何一种数据转换至 Byte类型。例如，不同的小数点分隔符号，会依据您系统的国别设定来做适当的确认。而千分位分隔符号也一样。
若 expression 超出 Byte 资料型态允许的范围，则将会显示错误。
（28） （3）CCur 函数 语法：CCur(expression)
该函数将参数expression转换为 Currency 类型并返回。
参数 expression 可以是任何有效的表达式。
注解：可以使用 CCur 来强制执行 Currency 运算，以免被当作整数运算。
可以使用 CCur 函数以在任何语言的版本中，让任何一种数据换至 Currency 型。例如，当使用CCur，不同的小数点分隔符号、千分位分隔符号，和不同的货币选项，会依据您系统的国别设定来做适当的确认。
（29） （4）CDate 转换为时间函数
语法：CDate(date) 函数将参数date转换为 Date 类型
该函数将参数date转换为 Date 类型并返回。
参数 date 是任何有效的日期表达式。
注解：可以使用 IsDate 函数来检查 date 是否可以被转换成日期或时间。而 CDate 接受日期文字和时间文字以及日期/
时间有效范围内的适当数值。当转换一个数字成为日期时，是将整数部分转换成日期；任何数字中的小数部分，将转换为从午夜起算的时间。
CDate 是依据您系统上的国别设定来决定日期的格式。若提供的格式为不可辨识的日期设定，则无法判断日、月、年的顺序。另外，它若包含有星期的字符串，对于这样的完整日期格式也无法辨识。
（30） （5）CDbl 转换为双精度函数
语法：CDbl(expression)
该函数将参数expresion转换为 Double 类型并返回。
参数 expression 可以是任何有效的表达式。
注解：可以使用 CDbl 或 CSng 来强制执行双精度或单精度运算以防止被当作货币或整数运算。
（31） （6）Chr函数
语法：Chr(charcode) 返回指定参数所代表的字元
该函数返回指定参数所代表的字元。
参数 charcode 是一个数值，它是用来识别某个字符。
注解：0 到 31 之间的数字与一般、非列印的 ASCII 码相同。例如，Chr(10) 会返回换行(linefeed)字元。
（32） （7）CInt 函数
语法：CInt(expression) 该函数将参数expression转换为 Integer 类型并返回。
参数 expression 可以是任何有效的表达式。
注解：可以使用 CInt 或 CLng 函数来强制执行整数运算，以免被当作货币、单精度、或双精度运算。
如果 expression 超出 Integer 型允许的范围，则会发生错误。 附注：CInt 函数与 Fix 及 Int 函数不同，Fix 和 Int 函数会将小数部分去除，然后返回整数值。当小数部分恰好
为 0.5 时， CInt 函数会将它转换成最接近的偶数值。例如，0.5 转换成 0，而 1.5 转换成 2。
（33） （8）CLng 函数转换为 Long 类型
语法：CLng(expression)
该函数将参数expression转换为 Long 类型并返回。
参数 expression 可以是任何有效的表达式。
注解：可以使用 CInt 或 CLng 来强制执行整数运算，以免被当作货币、单精度、或双精度运算。
如果 expression 超出 Long型允许的范围，则会发生错误。 附注：CLng 函数与 Fix 及 Int 函数不同，Fix 和 Int 函数会将小数部分去除，然后返回整数值。当小数部分恰好
为 0.5 时， CLng 函数会将它转换成最接近的偶数值。例如，0.5 转换成 0，1.5 转换成2。
（34） （9）CSng 函数
语法：CSng(expression) 该函数将参数expression转换成Single 类型并返回。
参数 expression 可以是任何有效的表达式。
注解：使用 CDbl 或 CSng 来强制执行双精度或单精度运算，以防止被当作货币或整数运算。
如果 expression 超出 Single 类型允许的范围，则会发生错误。
（35） （10）CStr 函数
语法：CStr(expression)
该函数将参数expression转换为 String 类型并返回。
参数 expression 可以是任何有效的表达式。
（36） （11）FormatCurrency 函数
VB函数
语法：FormatCurrency(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit
[,UseParensForNegativeNumbers [,GroupDigits]]]]) 返回一个以系统控制台中所设定的货币符号格式化的货币值表达式。 FormatCurrency 函数的语法是由下列部分所组成.：
Expression 为必须项，表示欲被格式化的表达式。
NumDigitsAfterDecimal 为可选项，表示有多少小数位数。默认值为 -1，表示使用系统地区设定值。
IncludeLeadingDigit 为可选项，以 Tristate 常数表示小数点前是否「显示前导零」。参阅「设定值」部分。 UseParensForNegativeNumbers 为可选项，以 Tristate 常数表示负数值是否带有括号。请参阅「设定值」部分。 GroupDigits 为可选项，以 Tristate 常数表示数字是否以「数位群组符号」来分隔，其视系统地区设定而有不同。请参阅「设定值」部分。
IncludeLeadingDigit，UseParensForNegativeNumbers 和 GroupDigits 参数有下列的设定值：

注解：当某一个或多个选项参数被省略了，那么将会使用系统地区设定值。
货币符号的位置是由系统地区设定值决定。
（37） （12）FormatDateTime 函数返回日期或时间格式的表达式
语法：FormatDateTime(Date[,NamedFormat])
该函数返回日期或时间格式的表达式。
FormatDateTime 函数的语法是由下列部分所组成：
Date 为必须项。为欲格式化的日期表达式。
NamedFormat 为必须项。表示所使用的日期/时间格式。若省略此参数，则使用 vbGeneralDate 。
NamedFormat 参数有下列的设定值：

（38） （13）FormatNumber函数函数返回一格式化的数字
语法：FormatNumber(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit
[,UseParensForNegativeNumbers [,GroupDigits]]]])
该函数返回一格式化的数字。
FormatNumber 函数的语法是由下列部分所组成：
Expression 必要项。欲被格式化的表达式。
NumDigitsAfterDecimal 为可选项。表示有多少小数位数。默认值为 -1，表示使用系统的设定值。 IncludeLeadingDigit 为可选项。以Tristate常数表示小数点前是否"显示前导零"。
UseParensForNegativeNumbers 为可选项。以 Tristate 常数表示负数值是否带有括号。 GroupDigits 为可选项。以 Tristate 常数表示数字是否以"数位群组符号"来分隔.
IncludeLeadingDigit，UseParensForNegativeNumbers 及 GroupDigits 参数如下设定值：

注解：若省略了某一个或多个选项参数，那么将会使用系统默认值。
（39） （14）FormatPercent 函数
语法：FormatPercent(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit
[,UseParensForNegativeNumbers [,GroupDigits]]]])
该函数返回带有%符号的格式化百分比表达式(以 100 为基底)。
FormatPercent 函数的语法是由下列部分所组成：
Expression 为必须项。表示欲被格式化的表达式。
NumDigitsAfterDecimal 为可选项。表示有多少小数位数。默认值为 -1，表示使用系统设定值。 IncludeLeadingDigit为可选项。以 Tristate 常数表示小数点前是否"显示前导零"。
UseParensForNegativeNumbers 为可选项。以 Tristate 常数表示负数值是否带有括号。 GroupDigits 为可选项。以 Tristate 常数表示数字是否以"数位群组符号"来分隔。
IncludeLeadingDigit，UseParensForNegativeNumbers 及 GroupDigits 参数有下列的设定值：

注解：若省略了某一或多个选项参数，那么将会使用系统默认的设定值。
（40） （15）Hex 函数转换成16进制
语法：Hex(number)
该函数将参数number以十六进制表示，用 String 返回。
VB函数 参数 number 可以是任何的数值表达式。
注解：如果 number 不是一个整数，那么在执行前会先被四舍五入成最接近的整数。 可以将十六进制数直接以&H开头来表示。例如，&H10代表十进位的 16。
（41） （16）Int、Fix 函数取整
语法：Int(number)
Fix(number)
该函数返回参数的整数部份。 参数 number 可以是任何的数值表达式。如果 number 的值为Null，则返回Null。
注解：Int 与 Fix 都会去掉 number 的小数部分而返回剩下的整数。 两个函数的不同之处在于，当 number 为负数时，Int 会返回小于或等于 number
的第一个负整数，而 Fix 则会返回大于或等于 number 的第一个负整数。例如，
Int 将 -8.4 转成 -9，而 Fix 则将 -8.4 转成 -8。
（42） （17）Oct 函数将参数number以八制表示
语法：Oct(number)
该函数将参数number以八制表示，用 String 返回。
参数 number 可为任何的数值表达式。
注解：如果 number 不是整数，那么在执行前会先四舍五入成最近似的整数。返回值如下：

（43） （18）val函数返回包含于字符串内的数字
语法：Val(string)
返回包含于字符串内的数字，字符串中是一个适当类型的数值。
注解：必要的 string 参数可以是任何有效的字符串表达式。
Val 函数，在它不能识别为数字的第一个字符上，停止读入字符串。那些被认为是数值的一部分的符号和字符，例如美圆号与逗号，都不能被识别。但是函数可以识别进位制符号 &O（八进制）和 &H（十六进制）。空白、制表符和换行符都从参数中被去掉。
下面的返回值为 1615198：
Val(" 1615 198th Street N.E.")
在下面的代码中，Val 为所示的十六进制数值返回十进制数值 -1。
Val("&HFFFF")
附注：Val 函数只会将句点（.）当成一个可用的小数点分隔符。当使用不同的小数点分隔符时，如在国际版应用程序中，代之以 CDbl 来把字符串转换为数字。
（44） Str数值转换为字符串
Str(123.45)结果“123.45”
（45） 十进制转八进制:Oct(num)
（46） 十六进制转八进制:oct("&H"&num)
（47） 十进制转十六进制:Hex(num)
（48） 八进制转十六进制:hex("&O"&num)
（49） 十六进制转换为十进制CLng("&H"&num)
（50） StrConv返回指定类型的转换
b = StrConv(strtemp, vbFromUnicode) 'StrConv(需要转换的字符, 转换后的格式)
vbUpperCase 1 将字符串文字转成大写。
vbLowerCase 2 将字符串文字转成小写。
vbProperCase 3 将字符串中每个字的开头字母转成大写。
vbWide* 4* 将字符串中单字节字符转成双字节字符。
vbNarrow* 8* 将字符串中双字节字符转成单字节字符。
vbKatakana** 16** 将字符串中平假名字符转成片假名字符。
vbHiragana** 32** 将字符串中片假名字符转成平假名字符。
vbUnicode 64 根据系统的缺省码页将字符串转成 Unicode
日期时间函数
（51） Date 函数返回当前系统日期
语法：date
返回当前系统日期。
（52） Cdate()转换成日期格式
函数将以日期型表达式转化为日期类型，例：a=”2016-08-26”
B=cdate(a),结果
（53） DateAdd 函数某个基准日期加上或减去数个时间间隔单位后的日期
语法：DateAdd(interval, number, date)
aa = DateAdd("d", 300, Date)表示当前日期日期之后的300天的日期
返回内容为某个基准日期加上或减去数个时间间隔单位后的日期。
DateAdd 函数语法中有下列几部分： interval为必须项。字符串表达式，表示所要加上去的时间间隔单位。其值请参考设定部分。
Number为必须项。数值表达式，表示要加上的时间间隔单位的次数。其数值可以为正数(可得未来日期)，亦可以为负数(可得过去的日期)。
Date为必须项。可为型态为 Variant (Date) 的变数或正确表示出日期的字符串，代表基准日期，将此基准日期加上 number 次的 interval 后，即为返回值日期。
参数 interval 的设定值如下：
yyyy表示年
q表示季
m表示月 y表示一年的日数
d表示日
w表示一周的日数
ww表示周
h表示时
n表示分 s表示秒
注解：可以使用 DateAdd 函数计算基准日期加上或减去您所指定的时间间隔后的结果。例如，可以用DateAdd 来计算
从今天起三十天后或三十天前的日期是哪一天；或者计算距离现在 45 分钟前或 45分钟后的时间。如果时间间隔是以 [天] 来计算，interval 参数可以是 [一年的日数] ("y")，[日] ("d")，或 [一周的日数] ("w")。
DateAdd 函数所返回的日期一定是有效且正确的。下面的范例以一月三十一日为基准日，计算加上一个月后的结果。
NewDate = DateAdd("m", 1, "31-Jan-95")
DateAdd 返回 28-Feb-95，而不是 31-Feb-95。如果基准日 date 是 31-Jan-96，返回值则是 29-Feb-96，因为 DateAdd 函数知道 1996 年是闰年。
如果计算出来的年度超过 100，就会产生程式错误。
如果 number 参数不是一个 Long 值，计算时会取最接近的整数值来计算。
（54） DateDiff 函数 两个日期间相差的时间间隔单位数目
语法：DateDiff(interval, date1, date2 [,firstdayofweek[, firstweekofyear]])
返回两个日期间相差的时间间隔单位数目。
DateDiff 函数语法中有下列几部分： interval 为必须项。字符串表达式，表示用来计算 date1 及 date2 时间差的时间间隔单位。
date1, date2 为必须项。日期表达式,为要用来计算的两个日期。
firstdayofweek 可选项。常数，表示一星期的第一天。如果省略此参数，则以星期日为第一天。
firstweekofyear 可选项。常数，表示一年的第一周。如果省略此参数，则以包含 一月一日的星期为第一周。 参数 interval 的设定值如下：yyyy表示年
q表示季
m表示月
y表示一年的日数
d表示日
w表示一周的日数
ww表示周
h表示时
m表示分
s表示秒
参数 firstdayofweek 的设定值如下：

注解：可以使用 DateDiff 函数来决定两个日期之间的时间间隔单位数目。例如，使用 DateDiff 来计算某两个日期之间
相隔几日，或计算从今天起到年底还有多少个星期。 如果想知道 date1 与 date2 相差的 [日] 数，interval 可以是 [一年的日数] ("y") 或 [日] ("d")。如果 interval 是 [一周的日数] ("w")，DateDiff 会返回两日期间相差的周数。如果date1 是星期一，DateDiff 会计算到 date2 为止之星期一的个数，包含 date2 但不包含 date1。不过，如果 interval 是 [周] ("ww")，DateDiff 函数会藉由计
算 date1 与 date2 之间星期天的个数，会返回两日期间的 [日历周] 数。如果 date2 刚好是星期天，则 date2 也会被加进计数结果中；但不论 date1 是否为星期天，它都不会被算进去。
如果 date1 比 date2 来得晚，DateDiff 函数返回值为负数。
如果 interval 参数为 [w] 或 [ww]，firstdayofweek 参数会影响其计算结果。 如果 date1 或 date2 以短式日期的格式传入日期参数，参数内所有年份若有给定，则该日期便是固定的。但是，若 date1 或 date2 以双引号括起来，且年份并未给定，则现在的年份便会自动加入date1 或 date2 参数中。如此书写便可适用于不同年份而无须更改代码。
但若计算十二月三十一日和来年的一月一日的年份差，DateDiff 会返回 1 表示相差一个年份，虽然实际上只相差一天而已。
（55） DatePart 函数返回指定日期的某个时间部分
语法：DatePart(interval, date[, firstdayofweek[, firstweekofyear]])
返回指定日期的某个时间部分。
aa = DatePart("yyyy", Date)返回当前日期的年份信息
日期部分
缩写
Year年
yy, yyyy
Quarter季
qq, q
Month月
mm, m
Dayofyear一年中的第多少天
dy, y
Day天
dd, d
Week第几周
wk, ww
Weekday周几
dw
Hour时
hh
Minute分
mi, n
Second秒
ss, s
Millisecond毫秒
ms

DatePart 函数语法有下列几部分：
interval为必须项。字符串表达式，指定的时间间隔单位。请参阅