关闭

VBS脚本技术手册(1)

标签: 脚本vbscriptstringdatemicrosoftfilter
355人阅读 评论(0) 收藏 举报
分类:

一、时间与日期函数

01:Date函数

例子:Msgbox date

将会显示“2009-03-13”

02:time函数

例子 :Msgbox time

将显示“15:21:38”

03:now函数

例子Msgbox now

将显示“2009-03-13 15:23:13”

04:year(),month(),day(),hour(),minute(),second()函数,参数是时间表达式,

例子:Msgbox year(now)

将显示 2009

注意:当月份是个位数时不补零。

05:函数weekday( day,[first day of week])默认vbsunday

Weekday 函数返回如下值:                                 

vbSunday

 

1

 

星期日

vbMonday

 

2

 

星期一

vbTsday

 

3

 

星期二

vbWednesday

 

4

 

星期三

vbThursday

 

5

 

星期四

vbFriday

 

6

 

星期五

vbSaturday

 

7

 

星期六

yyyy

   

q

季度

m

Y

一年的日数

D

w

 

一周的日数

ww

 

h

 

小时

n

 

分钟

s

 

06:monthname(month,[????])函数

month可以使数字月份比如monthname(3)

可选参数是显示完全名的开关,默认是false可以    是 tr

例子:Msgbox monthname(month(now))

将显示“三月”

07:weekdayname(weekday, [abbreviate,][ first day of week])

第二项为布尔型四缩写与否的开关,默认是false

第三项是星期的开始天

08:dateadd(interval, number, date)函数interval 参数可以有以下值:

可用 DateAdd 函数从日期中添加或减去指定时间间隔。例如可以使用 DateAdd 从当天算起 30 天以后的日期或从现在算起 45 分钟以后的时间。

例如:Msgbox DateAdd("m", 1, "31-Jan-2009")

将返回2009-2-28

09:DateDiff(interval, date1, date2 [,firstdayofweek[, firstweekofyear]])返回两个日期之间的时间间隔。

interval 参数可以有以下值:

interval必选项。字符串表达式表示用于计算 date1 和 date2 之间的时间间隔。有关数值,请参阅“设置”部分。

date1, date2 必选项。日期表达式。用于计算的两个日期。

Firstdayofweek 可选项。指定星期中第一天的常数。如果没有指定,则默认为星期日。有关数值,请参阅“设置”部分。

Firstweekofyear 可选项。指定一年中第一周的常数。如果没有指定,则默认为 1 月 1 日所在的星期。有关数值,请参阅“设置”部分。

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

返回给定日期的指定部分

二、数学函数

01:Abs()绝对值函数

02:Sin(),cos(),tan(),Atn()(反)三角函数

03:Log()自然对数是以 e 为底的对数

04:Rnd[(number)]随机数函数

参数

number

Rnd 生成

小于零

每次都相同的值,使用 number 作为种子。

大于零

序列中的下一个随机数。

等于零

最近生成的数。

省略

序列中的下一个随机数。

Rnd 函数返回一个小于 1 但大于或等于 0 的值

05:Sqr()平方根函数

06:Hex(number)将number转化为16进制数显示

oct(number)将number转化为8进制数显示

三、字符串处理函数

01:filter(array,string)返回在array中搜索包含string的那个元素赴欧在的整个字符串

例如:dim a

dim b(3)

b(0)="xxk"

b(1)="xx"

b(2)="xxkmnm"

a=filter(b,"xxk")

msgbox a(0)

msgbox a(1)

msgbox a(2)'

就此题目而言如果不注释掉则溢出出错,因为a只包含两个元素。

结果显示Xxk ,Xxkmnm

02:InStr([start开始位置默认1 ,]被查找str, 要查str[, compare])返回某字符串在另一字符串中第一次出现的位置。

例如:a=instr("mnmxxkmnm","xxk")

msgbox a

将输出4.

03:InStrRev(被查找str, 要查str[, compare])

返回某字符串从结尾数第一次出现的位置。

04:Join(array)把数组内字符组成一个长的字符串

MyArray(0) = "hello"
MyArray(1) = "xu"
MyArray(2) = "xiang"
MyArray(3) = "kai"
MyString = Join(MyArray)

则mystring输出helloxuxiangkai

05:LCase(string)把字符串中所有大写字母转化为小写的,其他字符不变

?se(string)把字符串中所有小写字母转化为大写的,其他字符不变

06:Left(string, length)

Right(string, length)返回指定数目的从字符串的左/右边算起的字符。

Dim MyString, LeftString
MyString = "VBSCript"
LeftString = Left(MyString, 3) 'LeftString 包含 "VBS"。

MSGBOX LeftString

Mid(string, start[, length])从字符串string中返回第star个数开始的lenth个字符

a=mid("1234567890",4,4)

msgbox a

将返回4567

07:Len(string)

Dim MyString
MyString = Len("VBSCRIPT") 'MyString 包含 8

08:Round(number[, 小数位数])返回按指定位数进行四舍五入的数值

pi= 3.14159

MyVar=Round(pi,2)

msgbox MyVar

将返回 3.14

09:Space(number)

返回由指定数目的空格组成的字符串

10:StrReverse(string1)

返回字符串,此字符串与指定字符串顺序相反

11:StrComp(string1, string2[, 0二进制1文本])

1大返回++1

2大返回--1

一样返回0

 四、类型转换函数

01:asc函数

Asc(string)返回与字符串的第一个字母对应的 ANSI 字符代码

Dim MyNumber
MyNumber = Asc("A")      '返回 65。
MyNumber = Asc("a")      '返回 97。
MyNumber = Asc("Apple")  '返回 65。

02:cbool函数

CBool(number)

如果number等于0则返回false,否则返回ture

03:cint函数

cint(string)

把string转换为int型

04:cstr函数

cstr(number)

把number转换为string型

 IsArray(varname)

IsDate(expression)

IsEmpty(expression)

IsNull(expression)

IsNumeric(expression)

是则返回ture否则返回false

 五、系统常数

1:颜色常数

因为这些常数是在 VBScript中设置, 您在应用之前不必定义它们. 您可在代码中任意处应用它们以表明说明值。

vbBlack

&h00

黑色

vbBl

&hFF0000

蓝色

vbRed

&hFF

红色

vbMagenta

&hFF00FF

紫色

vbGreen

&hFF00

绿色

vbCyan

&hFFFF00

青色

vbYellow

&hFFFF

黄色

vbWhite

&hFFFFFF

白色

 2:日期和时间常数因为这些常数VBScript 被建立,您在使用它们之前不必定义.您可在代码中任意处使用它们以表示说明

常数

描述

vbSunday

1

星期日

vbMonday

2

星期一

vbTsday

3

星期二

vbWednesday

4

星期三

vbThursday

5

星期四

vbFriday

6

星期五

vbSaturday

7

星期六

vbUseSystem

0

使用计算机区域设置中的日期格式。

vbUseSystemDayOfWeek

0

由系统设置定义每周的第一天是星期几。

vbFirstJan1

1

使用包含 1 月 1 日的星期(默认)。

vbFirstFourDays

2

使用第一个至少包含新的年中四天的星期。

vbFirstFullWeek

3

使用某年的第一个整周。

3:MsgBox 常数下列常数与 MsgBox 函数一起使用,标识在消息框中出现的按钮、图标,并指定默认按钮。另外,还可以指定消息框的样式。因为这些常数在VBScript中被建立,您在使用之前不必定义它们。您可在代码中任意处使用它们以表示说明值。

常数

描述

vbOKOnly

   0

只显示确定按钮。

vbOKCancel

   1

显示确定和取消按钮。

vbAbortRetryIgnore

   2

显示终止、重试和忽略按钮。

vbYesNoCancel

   3

显示是、否和取消按钮。

vbYesNo

   4

显示是和否按钮。

vbRetryCancel

   5

显示重试和取消按钮。

vbCritical

  16

显示临界消息图标。

vbQstion

  32

显示警告询问图标。

vbExclamation

  48

显示警告消息图标。

vbInformation

  64

显示提示消息图标。

vbDefaultButton1

   0

第一个按钮是默认按钮。

vbDefaultButton2

 256

第二个按钮是默认按钮。

vbDefaultButton3

 512

第三个按钮是默认按钮。

vbDefaultButton4

 768

第四个按钮是默认按钮。

vbApplicationModal

   0

应用程序模式。用户必须响应消息框,才能继续在当前应用程序中工作。

vbSystemModal

4096

系统模式。 在 Win16 系统中, 所有应用程序都将中止直到用户响应消息框。 在 Win32 系统中, 此常数提供一个应用程序模式信息框并总是保留在您可能正在运行的所有其它程序的顶部。

下列常数与 MsgBox 函数一起使用,标识用户选定的按钮。仅当类型库中包含以下常数定义,且在您的工程文件中已经显式引用该类型库后,才允许使用这些常数。对于 VBScript,必须在代码中显式声明这些常数。

常数

描述

vbOK

1

确定按钮被单击。

vbCancel

2

取消按钮被单击。

vbAbort

3

终止按钮被单击。

vbRetry

4

重试按钮被单击。

vbIgnore

5

忽略按钮被单击。

vbYes

6

是按钮被单击。

vbNo

7

否按钮被单击。

 4:日期格式常数因为这些常数在 VBScript 中被建立, 您在应用之前不必定义它们. 您可在代码中任意处使用它们以表示说明值.

常数

描述

vbGeneralDate

0

显示日期和/或时间。对于实数,显示日期和时间。如果没有小数部分,仅显示日期。如果没有整数部分,则仅显示时间。由系统设置决定日期和时间的显示。

vbLongDate

1

按计算机中区域设置指定的长日期格式显示日期。

vbShortDate

2

按计算机中区域设置指定的短日期格式显示日期。

vbLongTime

3

按计算机中区域设置指定的长时间格式显示时间。

vbShortTime

4

按计算机中区域设置指定的短时间格式显示时间。

5:字符串常。因为这些常数在 VBScript中被建立, 您在使用之前不必定义它们。 您可在代码中任意处使用它们以表示说明值。

常数

描述

vbCr

Chr(13)

回车符。

vbCrLf

Chr(13) & Chr(10)

回车符与换行符。

vbFormFeed

Chr(12)

换页符;在 Microsoft Windows 中不适用。

vbLf

Chr(10)

换行符。

vbNewLine

Chr(13) & Chr(10) 或 Chr(10)

平台指定的新行字符;适用于任何平台。

vbNullChar

Chr(0)

值为 0 的字符。

vbNullString

值为 0 的字符串

与零长度字符串 ("") 不同;用于调用外部过程。

vbTab

Chr(9)

水平附签。

vbVerticalTab

Chr(11)

垂直附签;在 Microsoft Windows 中不适用。

6:三态常数,这些常数在VBScript中被建立,因此您在使用之前不必定义它们您可在代码中任意处使用它们表示说明值。

常数

描述

vbUseDefault

-2

使用来自计算机最初设置中的默认值。

vbTr

-1

Tr

vbFalse

  0

False

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:23003次
    • 积分:340
    • 等级:
    • 排名:千里之外
    • 原创:5篇
    • 转载:33篇
    • 译文:0篇
    • 评论:1条
    文章存档
    最新评论
    友情链接