rnd函数

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）Lca函数换成小写并返回

语法：LCa(string)

将String转换成小写并返回

参数string可以是任何字符串表达式。如果string所含为Null，

将返回Null。

注解：只有大写的字母会转成小写；所有小写字母和非字母字符保持不

变。

（15）（5）Left函数

语法：Left(string,length)

返回一字符串由左算起特定数量的字符。

Left函数语法有下列的参数：

String参数，为函数欲执行的字符串表达式。如果string所含为Nu

ll，将返回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)、或前后空白(T

rim)删除后返回。

参数string可以是任何字符串表达式。如果string所含为Null，

则返回Null。

（18）（8）Mid函数一个字符串的某一位置向后返回特定数量

字符

语法：Mid(string,start[,length])

从一个字符串的某一位置向后返回特定数量字符。

Mid函数语法有下列的参数：

string字符串表达式。如果string所含为Null，则返回Null。st

art欲返回字符串在string之开头位置。如果start超过string

的范围，Mid则返回零长度字符串("")。

length即返回的字符数。如果省略或length超过可以返回的字符数，

(包括start处的字元)，那将返回从start到尾端的所有字符数。

下面的示例利用Mid函数返回字符串中从第四个字符开始的六个字符：

DimMyVar

MyVar=Mid("VB脚本isfun!",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，其中可包含任何有效的数值表达式。

当一数字转成字符串时，总会在前头保留一空位来表示正负。如果num

ber为正，返回的字符串包含一前导空格暗示有一正号。

使用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为欲返回之字符串长度。如果l

en的值为Null，则返回Null。

character字符码(代表某特定字元)或字符串表达式(使用其第一个

字元)，将用来建构返回字符串的特定字符。如果character的值为N

ull，则返回Null。

注解：如果您设定character的数值大于255，String会以下面式子

将之转为正确的字符码：

characterMod256

（24）（14）StrRever将字符串翻转

语法：StrRever(string1)

将特定字符串的字元顺序颠倒后返回。

string1参数是要颠倒的字符串。如果string1的长度为零("")，将

返回一空字符串。如果string1是Null，将会产生错误。

（25）（15）UCa函数字符串转换成大写并返回

语法：UCa(string)

将字符串转换成大写并返回。

参数string可以是任何字符串表达式。如果string所含为Null，

则返回Null。

注解：只有小写的字母会转成大写；原本大写或非字母保持不变。

格式转换函数

（26）（1）CBool转换为逻辑函数

语法：CBool(expression)

该函数将参数expression转换为Boolean型并返回。

参数可以是任何有效的表达式。

注解：如果expression的结果为0，则返回Fal；否则将返回Tr

ue。如果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函数以在任何语言的版本中，让任何一种数据换至Cur

rency型。例如，当使用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码相同。例如，C

hr(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型允许的范围，则会发生错误。附注：C

Lng函数与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[,Inclu

deLeadingDigit

[,UParensForNegativeNumbers[,GroupDigits]]]])返回一个以系

统控制台中所设定的货币符号格式化的货币值表达式。FormatCurrenc

y函数的语法是由下列部分所组成.：

Expression为必须项，表示欲被格式化的表达式。

NumDigitsAfterDecimal为可选项，表示有多少小数位数。默认值为-

1，表示使用系统地区设定值。

IncludeLeadingDigit为可选项，以Tristate常数表示小数点前是否

「显示前导零」。参阅「设定值」部分。UParensForNegativeNumbe

rs为可选项，以Tristate常数表示负数值是否带有括号。请参阅「设

定值」部分。GroupDigits为可选项，以Tristate常数表示数字是

否以「数位群组符号」来分隔，其视系统地区设定而有不同。请参阅「设

定值」部分。

IncludeLeadingDigit，UParensForNegativeNumbers和GroupDigit

s参数有下列的设定值：

注解：当某一个或多个选项参数被省略了，那么将会使用系统地区设定

值。

货币符号的位置是由系统地区设定值决定。

（37）（12）FormatDateTime函数返回日期或时间格式的

表达式

语法：FormatDateTime(Date[,NamedFormat])

该函数返回日期或时间格式的表达式。

FormatDateTime函数的语法是由下列部分所组成：

Date为必须项。为欲格式化的日期表达式。

NamedFormat为必须项。表示所使用的日期/时间格式。若省略此参数，

则使用vbGeneralDate。

NamedFormat参数有下列的设定值：

（38）（13）FormatNumber函数函数返回一格式化的

数字

语法：FormatNumber(Expression[,NumDigitsAfterDecimal[,Include

LeadingDigit

[,UParensForNegativeNumbers[,GroupDigits]]]])

该函数返回一格式化的数字。

FormatNumber函数的语法是由下列部分所组成：

Expression必要项。欲被格式化的表达式。

NumDigitsAfterDecimal为可选项。表示有多少小数位数。默认值为-

1，表示使用系统的设定值。IncludeLeadingDigit为可选项。以Tri

state常数表示小数点前是否"显示前导零"。

UParensForNegativeNumbers为可选项。以Tristate常数表示负数

值是否带有括号。GroupDigits为可选项。以Tristate常数表示数

字是否以"数位群组符号"来分隔.

IncludeLeadingDigit，UParensForNegativeNumbers及GroupDigit

s参数如下设定值：

注解：若省略了某一个或多个选项参数，那么将会使用系统默认值。

（39）（14）FormatPercent函数

语法：FormatPercent(Expression[,NumDigitsAfterDecimal[,Includ

eLeadingDigit

[,UParensForNegativeNumbers[,GroupDigits]]]])

该函数返回带有%符号的格式化百分比表达式(以100为基底)。

FormatPercent函数的语法是由下列部分所组成：

Expression为必须项。表示欲被格式化的表达式。

NumDigitsAfterDecimal为可选项。表示有多少小数位数。默认值为-

1，表示使用系统设定值。IncludeLeadingDigit为可选项。以Trist

ate常数表示小数点前是否"显示前导零"。

UParensForNegativeNumbers为可选项。以Tristate常数表示负数

值是否带有括号。GroupDigits为可选项。以Tristate常数表示数

字是否以"数位群组符号"来分隔。

IncludeLeadingDigit，UParensForNegativeNumbers及GroupDigit

s参数有下列的设定值：

注解：若省略了某一或多个选项参数，那么将会使用系统默认的设定值。

（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("1615198thStreetN.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(需要转换的字符,转换后的格式)

vbUpperCa1将字符串文字转成大写。

vbLowerCa2将字符串文字转成小写。

vbProperCa3将字符串中每个字的开头字母转成大写。

vbWide*4*将字符串中单字节字符转成双字节字符。

vbNarrow*8*将字符串中双字节字符转成单字节字符。

vbKatakana**16**将字符串中平假名字符转成片假名字符。

vbHiragana**32**将字符串中片假名字符转成平假名字符。

vbUnicode64根据系统的缺省码页将字符串转成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分钟后的时间。如果时间间隔是以[天]来计算，interv

al参数可以是[一年的日数]("y")，[日]("d")，或[一周的日数]

("w")。

DateAdd函数所返回的日期一定是有效且正确的。下面的范例以一月三

十一日为基准日，计算加上一个月后的结果。

NewDate=DateAdd("m",1,"31-Jan-95")

DateAdd返回28-Feb-95，而不是31-Feb-95。如果基准日date是3

1-Jan-96，返回值则是29-Feb-96，因为DateAdd函数知道1996年

是闰年。

如果计算出来的年度超过100，就会产生程式错误。

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

算。

（54）DateDiff函数两个日期间相差的时间间隔单位数目

语法：DateDiff(interval,date1,date2[,firstdayofweek[,first

weekofyear]])

返回两个日期间相差的时间间隔单位数目。

DateDiff函数语法中有下列几部分：interval为必须项。字符串表

达式，表示用来计算date1及date2时间差的时间间隔单位。

date1,date2为必须项。日期表达式,为要用来计算的两个日期。

firstdayofweek可选项。常数，表示一星期的第一天。如果省略此参

数，则以星期日为第一天。

firstweekofyear可选项。常数，表示一年的第一周。如果省略此参数，

则以包含一月一日的星期为第一周。参数interval的设定值如下：

yyyy表示年

q表示季

m表示月

y表示一年的日数

d表示日

w表示一周的日数

ww表示周

h表示时

m表示分

s表示秒

参数firstdayofweek的设定值如下：

注解：可以使用DateDiff函数来决定两个日期之间的时间间隔单位数

目。例如，使用DateDiff来计算某两个日期之间

相隔几日，或计算从今天起到年底还有多少个星期。如果想知道date

1与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[,firstweekofye

ar]])

返回指定日期的某个时间部分。

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

Millicond毫秒ms

DatePart函数语法有下列几部分：

interval为必须项。字符串表达式，指定的时间间隔单位。请参阅设定

部份。

date必须项。日期表达式，所要指定的日期。

firstdayofweek为可选项。常数，表示一星期的第一天。如果省略此参

数，则以星期日为第一天。请参阅设定部分。

firstweekofyear可选项。常数，表示一年的第一周。如果省略此参数，

则以包含一月一日的星期为第一周。参数interval的设定值同前面

的datadiff.

注解：使用DatePart函数来得知某个日期的特定时间单位。例如，您

可以使用DatePart来得知某个日期资料是星期几，

或是几点钟。

如果interval参数为[w]或[ww]，firstdayofweek参数会影响其

计算结果。

如果date以短式日期的格式传入日期参数，参数内的年份若给定，则

该日期便是固定的。但是，若date以双引号括起来，且年份并未给定，

则现在的年份便会自动加入date参数中。这样便可适用于不同年份而

无须更改程序代码。

（56）（5）DateSerial函数

语法：DateSerial(year,month,day)

该函数返回一个Variant(Date)，内容为指定的年、月、日的日期表示

式。

DateSerial函数语法有下列的参数：

year为必须项，类型为Integer，从100到9999间的整数，或一数

值表达式。

Month为任何数值表达式。

day任何数值表达式。注解：要表示某个日期，如1991年12月31

日，DateSerial函数中的每个参数值必须落在合理的范围内；即，1-3

1为合理之[日]，而1-12为合理之[月]。不过，您也可以计算和某

个基准日相差某年某月某日的日期。此时所传入的参数可以是任何数值

表达式，表示相差的年、月、或日数。

（57）（6）DateValue函数

语法：DateValue(date)

返回一Variant(Date)型的日期表示式。

注解：如果date中包含时间，DateValue会把时间部分舍去。但若d

ate只含时间而无日期(如"89:98")，会产生程式错误。如果date是

个字符串，且日期内容只有数字及日期分隔符号，DateValue会依照系

统所选定的短式日期格式来决定月、日、年在字符串中的顺序。DateVa

lue也接受以正确无误的英文月份名称代替月份数字所表示的日期，全

名或缩写均可。例如，除了可用12/30/1991和12/30/91外，DateVa

lue也接受December30,1991和Dec30,1991来表示同一日期。

如果date中的年份省略，DateValue会使用目前系统时间里的年份。

（58）（7）Day函数表示一个月中的某一日

语法：Day(date)

该函数返回一值，从1到31，表示一个月中的某一日。

date可以是任何表达式，只要能够表示一个合理的日期即可。如果da

te是Null，则返回Null。

（59）（8）Hour函数表示一天之中的某个[时]

语法：Hour(time)

该函数返回一个在0及23之间的值，表示一天之中的某个[时]。

参数time可以是任何表示合理时间的表达式。如果time是Null，则

返回Null。

（60）（9）Minute函数表示一小时中的某分钟

语法：Minute(time)

返回一值，从0到59，表示一小时中的某分钟。

参数time可以是任何可以表示出合理时间的表达式。如果time的值

为Null，

则返回Null。

VB函数

（61）（10）Month函数表示一年中的某月

语法：Month(date)返回一值，从1到12，表示一年中的某月。

参数date可以是任何能够表示一个合理日期的表达式。如果date的

值为Null,，则返回Null。

（62）（11）MonthName函数返回包含指定月份的字符串

语法：MonthName(month[,abbreviate])

返回包含指定月份的字符串。

MonthName函数的语法包含以下的组成部分：

month为必须项。代表月份的数值。例如，一月是1、二月是2，等等。

abbreviate可选项。为一boolean值，它可指定月份名称是否为缩写。

若省略，则默认值为Fal，即表示月份名称不为缩写。

（63）（12）Now函数返回电脑现在所记录的日期与时刻

语法：Now

返回电脑现在所记录的日期与时刻。

（64）（13）Second函数表示一分钟之中的某秒

语法：Second(time)返回一值，从0到59，表示一分钟之中的某秒。

参数time可以是任何可以表示出合理时间的表达式。如果time的值

为Null

则返回Null。

（65）（14）Time函数内容为系统时间(

语法：Time

返回一Variant(Date)，内容为系统时间(电脑所记录的现在时刻)。

（66）（15）TimeSerial函数内容为指定之时、分、秒的日

期表示式

语法：TimeSerial(hour,minute,cond)

返回一Variant(Date)，内容为指定之时、分、秒的日期表示式。

TimeSerial函数语法有下列的参数：

hour其值从0(12:00A.M.)到23(11:00P.M.)，或一数值表达式。

minute任何数值表达式。

cond任何数值表达式。注解:要表示某个时刻，如11:59:59，Time

Serial函数的各个参数值必需各落在其合理的范围内。也就是，[时]

必需介于0-23，而[分]与[秒]则必需介于0-59。不过，您也可以

在传递参数时使用数值表达式来得知对应于某基准时刻的相对时间。下

列范例便是使用表达式来求得相对时间，而不是直接求得某个时刻的日

期表示式。范例中TimeSerial函数将返回正午之前六小时(12-6)

又十五分(-15)的时间，即5:45:00A.M.。

TimeSerial(12-6,-15,0)

当有任何一个参数值超出其合理范围时，函数会自动将其进位到下一个

更大的时间单位中。例如，如果[分]的参数值为75（75分钟），函

数会将它解译成一小时又十五分。如果任何一个参数值超出-32,768到

32,767的范围，会产生程式错误。如果计算结果的时间会超出作业系

统所接受的时间或日期范围，亦会产生程序错误。

（67）（16）TimeValue函数用来表示一个时刻

语法：TimeValue(time)

返回一Variant(Date)的时间表示式。

参数time通常是一个字符串表达式，用来表示一个时刻，从0:00:00

(12:00:00A.M.)到23:59:59(11:59:59P.M.)。不过，time也可

以是能表示合理时刻的任何表达式。如果time的值为Null，则返回

Null。

注解：可以使用12小时制或24小时制的时间格式。例如，"2:24PM

"及"14:24"均是合理的时间表示式。

如果参数time内容包含日期，TimeValue会舍去日期。然而，若tim

e只有日期，则会产生程序错误。

（68）（17）Weekday函数代表某个日期是星期几

语法：Weekday(date,[firstdayofweek])

返回一整数，代表某个日期是星期几。

Weekday函数语法有下列的参数：

date任何可以表示一合理日期的表达式。如果date所含为Null，则

返回Null。

（69）（18）Weekdayname函数表示一星期中的某一天

语法：WeekDayName(weekday,abbreviate,firstdayofweek)

返回一字符串，表示一星期中的某一天。

WeekDayName函数的语法有下列部分：weekday为必须项。表示是一

星期中的哪一天的数值，而每一天所使用的数值则依照firstdayofwee

k的设定。abbreviate为可选项。为一boolean值，它可指定每日的

名称是否为缩写。若省略，则默认值为Fal，即表示每日的名称不为

缩写。

firstdayofweek可选项。表示一星期中第一天的数值。

（70）（19）Year函数表示某个年份

语法：Year(date)

返回一数值，表示某个年份。

参数date可以是任何表达式，只要能够表示一个合理的日期即可。如

果date的值为Null，则返回Null。

变体子类型

（71）（1）IsArray函数指出变量是否为一个数组

语法：IsArray(varname)

返回Boolean值，指出变量是否为一个数组。

必要的varname参数是一个指定变量的标识符。

注解：如果变量是数组，则IsArray返回True；否则返回Fal。对

于包含数组的

variant表达式来说，IsArray尤为有用。

（72）（2）IsDate函数用来指出表达式是否可以转换成日期

语法：IsDate(expression)

该函数返回Boolean值，用来指出表达式是否可以转换成日期。

参数expression可以是任何日期表达式，或是可以被辨别为日期或时

间的字符串表达式。

注解：如果表达式是一个日期或是可以被转换成有效日期，IsDate会

返回True；否则它会返回Fal。

（73）（3）IsEmpty函数用来指出变数是否已经初始化

语法：IsEmpty(expression)

返回Boolean值，用来指出变数是否已经初始化。

参数expression可以是任何表达式。然而，因为IsEmpty是用来决

定个别变数是否已初始化，所以参

数expression通常是单一变数名称。注解：如果变数未初始化，或

已明确设定为Empty，则IsEmpty会返回True；否则，则返回Fal。

如果expression含

有一个以上的变数，则一定返回Fal。

VB函数

（74）（4）IsNull函数来指出表达式是否未含任何有效的资

料

语法：IsNull(expression)

返回Boolean值，用来指出表达式是否未含任何有效的资料(Null)。

参数expression可以是任何表达式。注解：如果expression为Nu

ll，则IsNull返回True；否则IsNull会返回Fal。如果expres

sion中存在不只一个变数，

若其中任一变数为Null，则会使得整个表达式返回True。Null值的

作用是用来指出Variant不包含有效的资料。Null和Empty的不同

点在于，后者指出的是尚未初始化的变数，这和长度为零的字符串("")

不同，因为长度为零的字符串指的是空字符串。

使用IsNull函数是来决定表达式是否包含Null值。在某些情况下您

希望其值为True的表达式，就像IfVar=Null和IfVar<>Null，

其值永远为Fal。这是因为任何包含Null的表达式其值为Null，

也就因此为Fal。

（75）（5）IsNumeric函数用来指出表达式的运算结果是否

为数字

语法：IsNumeric(expression)

返回Boolean值，用来指出表达式的运算结果是否为数字。

参数expression可以是任何表达式。

注解：如果整个expression的运算结果为数字，则IsNumeric会返

回True；否则，它会返回Fal。如果expression是个日期表达式，

则IsNumeric会返回Fal。

（76）（6）IsObject函数用来指出识别项是否代表一个对象

语法：IsObject(expression)

返回Boolean值，用来指出识别项是否代表一个对象。

参数expression可以是任何表达式。

注解：如果expression是对象(Object)型态，或是使用者自订的

物件，IsObject都会返回True；否则它会返回Fal。

（77）（7）VarType函数返回一个变数类型的值

语法：VarType(varname)

返回一个变数类型的值。

参数varname可以是任何变数。

VarType函数的返回值如下：

注解：VarType函数从不对vbArray返回单独的值，而会加上其他的

值来表示一个数组是属于某种特殊类型。

vbVariant这个常数只会与vbArray同时返回，以用来表示VarType

函数的参数是一个数组的Variant。举例而言，一个整数数组的计算结

果是2+8194，或是8194。如果一个物件有初始的属性，VarType(o

bject)会返回此物件初始的属性。

附注：这些常数是由VBScript针对应用程式所特别设定的。这些名称

可以被用在程序码的任何地方，用以取代真正的

值。

其他函数

（78）（1）Array数组函数

语法：Array(arglist)

该函数返回一个包含了一个数组的Variant。

参数arglist是必要的，是以逗号隔开的值。这些值是被指定为Vari

ant中数组的元素。如果没有指定参数，则会建立零长度的阵列。

注解：当要引用数组元素时，使用的表示法为变数名称后加上以括号括

起来的索引参数字。在下列范例中，第一个陈

述式建立一个名为A的Variant变数。第二个陈述式指定一个数组给

变数A。最后一个陈述式将阵列中第二个元素的值指定给另一个变数。

DimA

A=Array(10,20,20)

B=A(2)

附注：不是定义数组的变数仍然可以含有数组元素。在观念上，含有数

组的Variant变数和含有Variant元素的数组变

数是不同的。但是在数组元素的存取方法上，并没有什么不同。

（79）（2）CreateObject函数创建

语法：CreateObject(class)

该函数建立并返回一个Automation物件的引用项目。

参数class使用me语法，并且具有下列几个部分：

rvername提供该物件应用程式的名称。

typename所要建立物件的型态或物件类别。注解：若要建立Automat

ion物件，请将CreateObject所返回的物件指定给物件变数：DimE

xcelSheet

SetExcelSheet=CreateObject("")

以上这个例子，在应用程序一开始就建立MicrosoftExcel表。只要

对象被建立了，当在程序里要引用物件的时候，就可以使用自定义的对

象变量。在接下来的

范例中，使用物件变数来运用新物件的属性和方法：ExcelSheet，和其

它MicrosoftExcel物件，包括Application物件和Cells集合物件。

例如：

通过Application对象来显现Excel。

e=True

写几个字到第一格内。

(1,1).Value="ThisiscolumnA,row1"

将这个sheet存档。

"C:"

使用Application物件的Quit方法来关闭Excel。

释放对象变量

SetExcelSheet=Nothing

（80）（3）Filter函数返回一个以零为基数的数组

语法：Filter(InputStrings,Value[,Include[,Compare]])

返回一个以零为基数的数组，其内容为符合筛选条件的字符串串子集合。

Filter函数的语法是由下列部分所组成：

InputStrings为必须项。为被搜寻的一维字符串。

Value为必须项。为所要寻找的字符串。

Include为可选项。以boolen值表示是否返回包含或不包含

Value的子字符串。若Include值为True，Filter所返回的字符串子

集合，将包含Value所指定的子字符串。若Include为Fal，Filt

er所返回的字符串子集合，并不包含Value所指定的子字符串。

注解：如果没有任何Value在InputStrings中比对成功，Filter将

返回一个空串。若InputStrings为Null或不是一维阵列，

则发生错误。

由Filter函数所返回的值，只包含了足够放置比较正确项目的成员。

（81）（4）InputBox函数显示一个对话框输入内容

语法：InputBox(prompt[,title][,default][,xpos][,ypos][,he

lpfile,context])

该函数显示一对话框让使用者输入文字,按下确定按钮，则返回输入的

内容内容。

InputBox函数语法有下列的参数：

prompt字符串表达式。用来做为对话框讯息的字符串表达式。prompt

的最大长度大约是1024个字元，由使用字符的宽度来决定。如果pr

ompt超过一行，您可以在各行之间用Chr(13))、换行字元(Chr(10))、

或是复位字元与换行字元的组合(Chr(13)&Chr(10)来做分隔。

title显示为对话框标题。如果没有title，则以应用程序的名称做为

标题。default显示在文字方块中的字符串表达式，在没有提供其他

输入时做为默认值。如果没有default，则文字方块就是空白的。

xpos数值表达式。成对指定的数值表达式，用来指定对话框的左边与

屏幕左边的水平距离。如果没有xpos，则对话框会出现在水平方向的

中间。

ypos成对指定的数值表达式，用来指定对话框的上缘与萤幕的上缘的

距离。如果没有ypos，对话框会放置于屏幕垂直方向三分之一的位置。

helpfile字符串表达式，用来指定对话框的帮助文件。如果指定了he

lpfile，则也必须指定context。

context数值表达式，由帮助文件指定给某个说明主题的说明主题代码。

如果指定了context，则也必须指

定helpfile。

注解：如果同时提供helpfile与context，对话框中会自动加上一个

Help按钮。

如果使用者按了一下「确定」或是按了ENTER，则InputBox函数会

返回文字方块中的内容；如果使用者按了一下「取消」，则此函数会

返回一个长度为零的字符串("")。

（82）（5）Join函数返回一字符串，结果是由数组中一些子字

符串的连结

语法：Join(list[,delimiter])

返回一字符串，结果是由数组中一些子字符串的连结。

Join函数的语法是由下列部分所组成：

list为必须项。包含欲连结之子字符串的一维数组。

Delimiter为可选项。使用于返回字符串中分隔子字符串的字符。若省

略，则使用空白字元("")。若delimiter为空字符串，所有的连结将

无分隔字符。

（83）（6）LBound函数返回指定数组某维最小可使用的数组

索引

语法：LBound(arrayname[,dimension])

返回指定数组某维最小可使用的数组索引。LBound函数语法有下列几

部份：

Arrayname数组变量的名称，遵循标准变量命名规格。

dimension表示返回的是某一维的下限。1表示第一维，2表示第二维，

依此类推。如果省略dimension，其默认值为1。

注解：同时使用LBound函数和UBound函数来决定数组的大小。使用

UBound函数来找出数组每一维的上限。

Lbound(A,1)返回值1

Lbound（A,2）返回值0

任何维数预设的下限永远是0。

（84）（7）LoadPicture函数该函数返回一图形对象

语法：LoadPicture(picturename)

该函数返回一图形对象。

picturename参数是一个字符串表达式，为欲载入的图形文件名。

注解：图形格式由LoadPicture管理，包括了点阵图档(.bmp)、图示

档(.ico)、RLE(Run-LengthEncoded)档(.rle)、中继

档(.wmf)、加强式中继档(.emf)、GIF档(.gif)以及JPEG档(.jp

g)。

（85）（9）RGB函数颜色

语法：RGB(red,green,blue)

Red为红色,green为绿色,blue为蓝色

（86）（10）ScriptEngine函数所使用的Script程式语言

语法：ScriptEngine

返回一字符串，表示所使用的Script程式语言。

ScriptEngine函数可返回下列任一字符串：

（87）（11）ScriptEngineMajorVersion函数返回所使

用的Script引擎的主要版本编号

语法：ScriptEngineMajorVersion

返回所使用的Script引擎的主要版本编号。

注解：返回值代表目前使用的Script程式语言，在DLL中所含的版

本资讯。

（88）（12）ScriptEngineMinorVersion函数返回所使用

的Script引擎的次要版本编号

语法：ScriptEngineMinorVersion

返回所使用的Script引擎的次要版本编号。

注解：返回值代表目前使用的Script程式语言，在DLL中所含的版

本资讯。

（89）（13）Space函数返回特定数目空格的字符串

语法：Space(number)

返回特定数目空格的字符串。参数number是您想要的空格数。

（90）（14）Split二进制比较函数

语法：Split(expression[,delimiter[,count[,compare]]])

返回一个以零为基数，一维的数组。这个数组会包含特定个数的子字符

串。Split函数的语法包含以下几部分：

expression为必须项。为一字符串表达式，这个字符串表达式要包含

子字符串及分隔符号。如果expression的长度为零，Split函数会返

回一个空的数组，也就是说，一个没有包含任何元素及数据的数据。

Delimiter为可选项。用来表示子字符串界限的字符串字元。如果省略，

空白字元("")将被指定为分隔符号。如果delimiter为空字符串，

会返回一个元素，即包含了整个expression字符串的数组。count

为可选项。要被返回的子字符串个数。-1则表示所有的子字符串将被返

回。

（91）（15）TypeName函数

语法：TypeName(varname)

返回一个String，它提供某个变量的相关信息。必要项varname可

以是任何变数。TypeName函数有下列返回值：

（92）（16）Ubound函数返回指定数组某维最大可使用

的索引

语法：UBound(arrayname[,dimension])

返回指定数组某维最大可使用的索引。UBound函数语法有下列几部份：

arrayname必要的参数。数组变量的名称，遵循标准变数命名规格。

dimension可选项。表示返回的是那一维的上限。1表示第一维，2表

示第二维，依此类推。如果省略dimension，则默认是1。

注解：UBound函数和LBound函数一起使用可以决定阵列的大小。使

用LBound函数来找出阵列每一维的下限。

任何维数初试值的下限永远是0。所以，若数组的维数如下所示，UBou

nd返回如下表的值：DimA(100,3,4)返回值

UBound(A,1)为99UBound(A,2)为2UBound(A,3)为3

（93）（17）chr(13)换行

在句末加上chr（13）即可换行

（94）（18）Vbcrlf换行

在句末加上Vbcrlf即可换行

（95）（19）chr(10)回车

在句末加上chr（10）表示回车

（96）（20）Uca转换成大写

Uca（expression）

（97）（21）Lca转换成小写

Lca（expression）

（98）Ca条件表达

Selectca测试变量或条件表达式

例如

Selectca测试变量或条件表达式

Ca表达式列表1

语句模块1

Ca表达式2

语句模块2

。

。

。

Cael

语句N

Endlect

Ca可以是变量也可以是表达式经常用到to、is表示

例如：ca1to10测试变量值在1到10的范围内则匹配

Cais>100表示测试变量的值大于100则匹配

Ca1to10，12，is>100表示测试变量的值在1到10的范围内或者等于12或者大

于100时匹配

（99）Offt偏移引用函数

语法：offt（参考位置，向下偏移，向右偏移，引用区域的行数，引用区域的列数）

OFFSET(A1,2,2,1,1)，其中A1是参考系，接着的2,2分别表示下，右移动的行数和列数，同

样向上，左则是负数。最后面的1,1表示引用的区域大小是一行一列，也就是一个单元格

（100）Const常数运用

格式：const字符变量名[as类型]=表达式

例如：

Constpi=3.1415926‘表示PI值为3.1415926，单精度类型

ConstMAXasinterger=&H21ED’声明变量MAX代表十六进制整数21ED

ConstCOUNT#=53.87‘表示变量count代表53.87，双精度

（101）Find查找函数

格式：(要查找的内容，要查找的区域，起始查找位置)，返回值为要查找的内

容的位置

例：

A=”findouter”

(“outer”,A)=4

(“outer”,A,1)=4

(“outer”,A,2)=4

（102）Shell函数

Shell函数可调用各类应运程序，格式为：shell（命令字符串[,窗口类型]）

命令字符串必须包含要执行的应运程序名称（包含路径），必须为可执行文件（.com,.exe,.bat）

窗口类型表示执行程序的窗口状态，0~4，6的整型数值，1表示正常窗口状态。

函数调用成功返回一个任务标识ID，失败则返回0

如果不知道程序的具体路径名可用start命令启动程序，例：

Shell（start&“”）‘利用start打开计算器

（103）Beep响铃函数

语法：

Beep

电脑的声音

（104）Freefile取得未使用的文件号

实例：

DimMyIndex,FileNumber

ForMyIndex=1To5'循环五次。

FileNumber=FreeFile'取得未使用的文件号。

Open"TEST"&MyIndexForOutputAs#FileNumber'创建文件名。

Write#FileNumber,"Thisisasample."'输出文本至文件中。

Clo#FileNumber'关闭文件。

NextMyIndex

数据类型

（105）Empty空

Varitype返回值0

（106）Null无效值

Varitype返回值1

（107）Integer（%）整数

Varitype返回值2

数值范围为-32768—+32768

（108）Long（&）长整数

Varitype返回值3

数值范围为-2178483648—+2178483648

（109）Single（！）单精度浮点数

Varitype返回值4

可以精确到7位十进制数

（110）Double（#）双精度浮点型

Varitype返回值5

精确到15-16位十进制数

（111）Currency（@）货币型数

Varitype返回值6

是定点数，小数点左边15位，右边4位

（112）Byte二进制数

Varitype返回值17

存储为单精度，无符号类型，取值范围0~255

（113）String（$）字符型数据

Varitype返回值8

所谓字符型数据就是双括号引住的字符串，如“你好”、“大爷李”。。。等等，最多包含20

亿个字符，可以设定字符串长度，格式为：

Dim变量名asstring*字符串长度

例：dimaaasstring*8，表示定义字符串aa的长度为8个字符

（114）Boolean逻辑数据类型

Varitype返回值11

存储位数16位，数据只有两个值true（真）和fal（假）

其他类型的数据转换成逻辑数据时，非0数据全部转换为true，0转换为fal

（115）Date日期数据类型

Varitype返回值7

用磅号（#）括起来就可以认作是日期型数据，例如：#1jan，97#、#1999-08-0112:30:11PM#、

#january1,1998

#（116）Object对象数据类型

Varitype返回值9

存储为32位（4个字节），作为对象的引用，利用t语句声明为object的变量可以赋值给

任何对象的引用

例如

Dimstkasobject

Setstk=form1

（117）Variant变体数据类型

Varitype返回值12

也称为万用数据类型，它对数据的处理根据上下文的变化而变化，VB专门提供一个参数

Vartype来检测variant中保存的数据类型。

（118）Error错误

Varitype返回值10

（119）Array数组

Varitype返回值8192

（120）Static静态变量

用dim定义的变量初始值为0，用static定义的变量除第一次调用时为0，之后变量不会被

初始化

（121）Numeric数值数据类型

包含整数型、浮点数、货币型数、字节型数

常用颜色常数

算数运算符

逻辑运算（布尔运算）

输出函数

（122）MsgBox函数将讯息显示在对话框中

语法：MsgBox(prompt[,buttons][,title][,helpfile,context])

将讯息显示在对话框中，等使用者按下按钮，并返回一值来表示使用者

按下的是哪一个钮。MsgBox函数语法有下列的参数：

prompt字符串表达式，用以做为显示在对话框中的讯息。prompt的最

大长度大约是1024个字元，由使用字元的宽度决定。如果prompt超

过一行，您可以在每一行之间用复位字符(Chr(13))、换行字元(Chr(1

0))、或是复位字元与换行字元的组合(Chr(13)&Chr(10))来做区隔。

buttons数值表达式。用来指出显示按钮的数目及形式，使用的图示样

式，预设按钮为何等。如果没有指定，则buttons的默认值是0。

title显示在对话框标题列中的字符串表达式。如果省略title，则将

应用程序的名称放在标题列中。

helpfile用来辨识提供给对话框文字感应说明帮助文件表达式。如果

指定了helpfile，则也必须指定context。context数值表达式，由

说明档案的作者来指定适当的说明主题的说明主题代码。如果指定了c

ontext，则也必须指定helpfile。

参数buttons的设定有以下几个：

第一组值(0-5)用来决定对话方块中按钮的形式与数目；第二组(16,

32,48,64)用来决定对话框的样式；第三组(0,256,512)决定出

那一个按钮是默认按钮；而第四组(0,4096)则决定讯息对话框是否

为模态。将这些数字相加以产生buttons,参数值的时候，您只能由每

组取用一个数字。

MsgBox函数有下列返回值：注解：如果同时指定了helpfile及con

text，使用者便可以按F1来查看与context相关的帮助主题。

如果对话框有显示Cancel按钮，则按下ESC键与按下Cancel.按钮效

果相同。如果对话方块中有Help按钮，则对话框中提供有帮助文件说

明。无论如何，在其他按钮中的一个被按下前，不会返回任何值。

（123）Iif函数

Iif（表达式，表达式为真时返回值，表达式为假时返回值）

Iif函数是if。。。then。。el。。的简洁写法

（124）Choo条件选择函数

用法：

Choo（整数表达式，选项列表）

例：

Choo（weekday（now），“星期日”，“星期一”，“星期二”。。。。）