VBScript语法速查及实例说明

2020-06-26 17:47:40

字体：大中小

来源：转载

供稿：网友

VBScript 函数

功能说明

例子

Abs (数值) 绝对值。一个数字的绝对值是它的正值。空字符串 (null) 的绝对值，也是空字符串。未初始化的变数，其绝对为 0 例子：ABS(-2000)

结果：2000

Array (以逗点分隔的数组元素) Array 函数传回数组元素的值。例子：

A=Array(1,2,3)

B=A(2)

结果： 2

说明：变量B为A数组的第二个元素的值。

Asc (字符串) 将字符串的第一字母转换成 ANSI (美国国家标准符号)字码。例子：Asc(Internet")

结果：73

说明：显示第一字母 I 的 ANSI 字码。

CBool(表达式) 转换成布尔逻辑值变量型态(True 或False ) 例子：CBool(1+2)

结果：True

CDate (日期表达式) 换成日期变量型态。可先使用 IsDate 函数判断是否可以转换成日期。例子： CDate (now( )+2)

结果：2000/5/28 10:30:59

CDbl(表达式) 转换成DOUBLE变量型态。

Chr ( ANSI 字码) 将ASCII 字码转换成字符。例子： Chr ( 72 )

结果： H

CInt (表达式) 转换成整数变量型态。例子： CInt ("3.12")

结果： 3

CLng (表达式) 转换成LONG 变量型态。

CSng (表达式) 转换成SINGLE 变量型态。

CStr (表达式) 转换成字符串变量型态。

Date ( )top 传回系统的日期。例子： Date

结果： 2000/5/13

DateAdd ( I , N , D ) 将一个日期加上一段期间后的日期。 I ：设定一个日期( Date )所加上的一段期间的单位。譬如 interval="d" 表示 N的单位为日。 I的设定值如下：

yyyy Year 年

q Quarter 季

m Month 月

d Day 日

w Weekday 星期

h Hour 时

n Minute 分

s Second 秒

N ：数值表达式，设定一个日期所加上的一段期间，可为正值或负值，正值表示加(结果为 >date 以后的日期)，负值表示减(结果为 >date 以前的日期)。

D ：待加减的日期。例子： DateAdd ( "m" , 1 , "31-Jan-98")

结果： 28-Feb-98

说明：将日期 31-Jan-98 加上一个月，结果为 28-Feb-98 而非 31-Fe-98 。

例子： DateAdd ( "d" , 20 , "30-Jan-99")

结果： 1999/2/9

说明：将一个日期 30-Jan-99 加上 20 天后的日期。

DateDiff (I , D1 , D2[,FW[,FY]]) 计算两个日期之间的期间。

I ：设定两个日期之间的期间计算之单位。譬如 >I="m" 表示计算的单位为月。 >I 的设定值如：

yyyy > Year 年

q Quarter 季

m Month 月

d Day 日

w Weekday 星期

h Hour 时

m Minute 分

s Second 秒

D1 ,D2：计算期间的两个日期表达式，若 >date1 较早，则两个日期之间的期间结果为正值;若 >date2 较早，则结果为负值。

FW ：设定每周第一天为星期几，若未设定表示为星期天。 >FW 的设定值如下：

0 使用 >API 的设定值。

1 星期天

2 星期一

3 星期二

4 星期三

5 星期四

6 星期五

7 星期六

FY ：设定一年的第一周，若未设定则表示一月一日那一周为一年的第一周。 >FY 的设定值如下：

0 使用 >API 的设定值。

1 一月一日那一周为一年的第一周

2 至少包括四天的第一周为一年的第一周

3 包括七天的第一周为一年的第一周例子： DateDiff ("d","25-Mar-99 ","30-Jun-99 ")

结果： 97

说明：显示两个日期之间的期间为 97 天。

DatePart (I,D,[,FW[,FY]]) 传回一个日期的之部份。

>I ：设定传回那一部份。譬如 >I="d" 表示传回部份为日。 >I 的设定值如下：

yyyy Year 年

q Quarter 季

m Month 月

d Day 日

w Weekday 星期

h Hour 时

m Minute 分

s Second 秒

D ：待计算的日期。

>FW ：设定每周第一天为星期几，若未设定则表示为星期天。 >FW 的设定值如下：

0 使用 >API 的设定值。

1 星期天

2 星期一>3 星期二

4 星期三

5 星期四

6 星期五

7 星期六

FY ：设定一年的第一周，若未设定则表示一月一日那一周为一年的第一周。 >FY 的设定值如下：

0 使用 >API 的设定值。

1 一月一日那一周为一年的第一周

2 至少包括四天的第一周为一年的第一周

3 包括七天的第一周为一年的第一周例子： DatePart ("m","25-Mar-99 ")

结果： 3

说明：显示传回一个日期的月部份。

Dateserial (year,month,day) 转换(year,month,day) 成日期变量型态。例子： DateSerial (99,10,1)

结果： 1999/10/1

DateValue ( 日期的字符串或表达式 ) 转换成日期变量型态，日期从 January 1,100 到 December 31,9999 。格式为 month,day,and year 或 month/day/year 。譬如： December 30,1999 、 Dec 30,1999 、 12/30/1999 、 12/30/99 例子： DateValue ("January 1,2002 ")

结果： 2002/1/1

Day( 日期的字符串或表达式 ) 传回日期的「日」部份。例子： Day(" 12/1/1999 ")

结果： 1

Fix( 表达式 )top 转换字符串成整数数字型态。与 Int 函数相同。若为 null 时传回 null 。

Int (number) 与 Fix(number) 的差别在负数。如 Int (-5.6)=-6 ， Fix(-5.6)=-5 。例子： Fix(5.6)

结果： 5

Hex( 表达式 )top 传回数值的十六进制值。若表达式为 null 时 Hex( 表达式 )=null ，若表达式 =Empty 时 Hex( 表达式 )=0 。 16 进位可以加「 &H 」表示，譬如 16 进位 &H10 表示十进制的 16 。例子： Hex(30)

结果： 1E

Hour( 时间的字符串或表达式 ) 传回时间的「小时」部份。例子： Hour("12:30:54 ")

结果： 12

InStr ([start,]string1,string2[,compare]) top 将一个字符串由左而右与另一个比较，传回第一个相同的位置。

start 为从第几个字比较起，若省略 start 则从第一个字比较起， string1 为待寻找的字符串表达式， string2 为待比较的字符串表达式， compare 为比较的方法， compare=0 表二进制比较法， compare=1 表文字比较法，若省略 compare 则为预设的二进制比较法。例子： InStr("abc123def123","12")

结果： 4

InstrRev ([start,]string1,string2[,compare]) 将一个字符串由右而左与另一个比较，传回第一个相同的位置。

start 为从第几个字比较起，若省略 start 则从第一个字比较起， string1 为待寻找的字符串表达式， string2 为待比较的字符串表达式， compare 为比较的方法， compare=0 表二进制比较法， compare=1 表文字比较法，若省略 compare 则为预设的二进制比较法。例子： InstrRev ("abc123def123","12")

结果： 10

Int ( 表达式 ) 传回一个数值的整数部份。与 Fix 函数相同。例子： Int (5.6)

结果： 5

IsArray ( 变数 ) 测试变量是 (True) 否 (False) 是一个数组。例子： IsArray (3)

结果： False

说明：不是一个数组。

IsDate ( 日期或字符串的表达式 ) 是否可以转换成日期。日期从 January 1,100 A.D. 到 December 31,9999 A.D 。例子： IsDate ("December 31,1999 ")

结果： True

说明：可以转换成日期。

IsEmpty ( 变数 ) 测试变量是 (True) 否 (False) 已经被初始化例子： IsEmpty (a)

结果： True

IsNull ( 变数 ) 测试变数是 (True) 否 (False) 不是有效的数据。例子： IsNull ("")

结果： False

说明：是有效的数据。

IsNumeric ( 表达式 ) 是 (True) 否 (False) 是数字。例子： IsNumeric ("abc123")

结果： False

说明：不是数字。

LCase ( 字符串表达式 ) top 转换字符串成小写。将大写字母的部份转换成小写。字符串其余的部份不变。例子： LCase ("ABC123")

结果： abc123

Left( 字符串表达式 ,length) 取字符串左边的几个字。 length 为取个字。 Len 函数可得知字符串的长度。例子： Left("ABC123",3)

结果： ABC

Len( 字符串表达式变量 ) 取得字符串的长度。例子： Len("ABC123")

结果： 6

LTrim ( 字符串表达式 ) 除去字符串左边的空白字。 RTrim 除去字符串右边的空白字， Trim 函数除去字符串左右两边的空白字。例子： LTrim ("456+" abc ")

结果： 456abc123

Mid( 字符串表达式 ,start[,length]) top 取字符串中的几个字。 start 为从第几个字取起， length 为取几个字，若略 length 则从 start 取到最右底。由Len 函数可得知字符串的长度。例子： Mid("abc123",2,3)

结果： c12

Minute( 日期的字符串或表达式 ) 传回时间的「分钟」部份。例子： Minute("12:30:54")

结果：30

Month(日期的字符串或表达式) 传回日期的「月」部份。例子：Month("12/1/2001")

结果：12

MonthName(month[,abbreviate]) 传回月的名称。

month ：待传回月名称的数字 1~12 。譬如， 1 代表一月， 7 代表七月。

abbreviate: 是 (True) 否 (False) 为缩写，譬如 March ，缩写为 Mar 。默认值为 False 。中文的月名称无缩写。例子： MonthName (7)

结果：七月

Now() 传回系统的日期时间。例子： Now()

结果： 2001/12/30 10:35:59 AM

Oct() 传回数值的八进位值。八进位可以加「 &O 」表示，譬如八进位 &O10 表示十进制的 8 。例子： Oct(10)

结果： 12

Replace( 字符串表达式,findnreplacewith[,start[,count[,compare]]]) 将一个字符串取代部份字。寻找待取代的原字符串 (find) ，若找到则被取代为新字符串 (replacewith) 。

find ：待寻找取代的原字符串。

replacewith ：取代后的字。

start ：从第几个字开始寻找取代，若未设定则由第一个字开始寻找。

count ：取代的次数。若未设定则所有寻找到的字符串取代字符串全部被取代。

compare ：寻找比较的方法， compare=0 表示二进制比较法， compare=1 表文字比较法， compare =2 表根据比较的数据型态而定，若省略

compare 则为预设的二进制比较法。例子： Replace("ABCD123ABC","AB","ab")

结果： abCD123abC

Right( 字符串表达式 ,length) 取字符串右边的几个字， length 为取几个字。 Len 函数可得知字符串的长度。例子： Right("ABC123",3)

结果： 123

Rnd [(number)] 0~1 的随机随机数值。 number 是任何有效的数值表达式。若 number 小于 0 表示每次得到相同的随机随机数值。 number 大于 0 或未提供时表示依序得到下一个随机随机数值。 >number=0 表示得到最近产生的随机随机数值。为了避免得到相同的随机随机数顺序，可以于 Rnd 函数前加 Randomize 。例子： Rnd

结果： 0.498498

Round( 数值表达式 [,D]) 四舍五入。

D ：为四舍五入到第几位小数，若省略则四舍五入到整数。例子： Round(30635,1)

结果： 3.6

RTrim ( 字符串表达式 ) 除去字符串右边的空白字。 LTrim 除去字符串左边的空白字， Trim 函数除去字符串左右两边的空白字。例子： RTrim ("abc123 ")+"456"

结果： abc123456

Second( 时间的字符串或表达式 )top 传回时间的「秒」部份。例子：Second("12:30:54")

结果：54

Space( 重复次数 ) 得到重复相同的空白字符串。例子： A"+Space (5)+"B

结果： A B

说明： A 和 B 中间加入五个空白字。

String( 重复次数，待重复的字 ) 得到重复相同的字符串。例子： String(5,71)