本文主要介绍VBS基础篇——VBScript常用函数，有需要的朋友可以参考一下。
Vbs常用功能
函数名
语法
功能
丙烯腈-丁二烯-苯乙烯
Abs(数字)
返回一个数字的绝对值。
平方根(Square Root)
Sqr(数字)
返回一个数的平方根。
犯罪
Sin(数字)
返回角度的正值。
因为
Cos(数字)
返回角度的残差值。
黝黑色
谭(数)
返回一个角度的正切值。
扩充转移网络
Atn(数字)
返回角度的反正切值。
原木
日志(数字)
返回一个数的自然对数。
（同Internationalorganizations）国际组织
Int(数字)
采用integer函数并返回第一个小于number的整数。
格式编号
FormatNumber(数字，numdigitsafterdecimal)
转换为具有指定numdigitsafterdecimal位数的数字。
Rnd
Rnd()
返回0到1之间的随机数。
Ubound
Ubound(数组名，维度)
返回该数组的最大下标。
绑定
Lbound(数组名，维度)
返回最小下标数字。
注意事项：
Rnd功能
语法：Rnd[(数字)]
返回一个随机数。参数号可以是任何数值表达式。
评论：
RN函数返回的随机数在0到1之间，可以等于0但不等于1。
number的值影响Rnd返回的随机数：
数字的价值
返回值
小于0
Numbe每次都作为随机结果使用。
大于0
随机序列中的下一个随机数。
等于0
生成的最后一个随机数。
遗漏
随机序列中的下一个随机数。
各种转换功能和函数
功能
功能
CStr(变体)
将变量variant转换为字符串类型。
CDate(变体)
将变量variant转换为日期类型
CInt(变体)
将变量variant转换为整数类型
CLng(变体)
将变量variant转换为长整型。
CSng(变体)
将变量variant转换为单一类型。
CDbl(变体)
将变量variant转换为double类型
CBool(变体)
将变量variant转换为布尔类型
注意事项：
1个整数
Integer是一个整数，其范围是-32，768到32，767。
2.长整数
Long(长整数)，范围从-2，147，483，648到2，147，483，647。
3.单精度类型
Single(单精度浮点)，其取值范围为负数时从-3.402823E38到-1.401298E-45，正数时从1.401298E-45到3.402823E38。
4.双精度类型
Double(双精度浮点型)它的取值范围是从-1.79769313486232E308到-4.9406564584124 e-324，当它是负数时，从4.5到4.5。49636.76666666676
常见的字符串函数和函数
功能
语法
功能
低输入联网（low-entry networking的缩写）
长度(字符串)
返回字符串中的字符数。
附加装饰
修剪(字符串)
删除字符串前后的空格。
Ltrim
Ltrim(字符串)
删除字符串前面的空格。
Rtrim
Rtrim(字符串)
删除字符串后的空格。
中间的
Mid(字符串，起始，长度)
从字符串的起始字符获取长度字符串。如果省略第三个参数，则表示从开始字符到字符串结尾的字符串。
左边的
左(字符串，长度)
从字符串string的左侧获取一个长度的字符串。
对吧
右(字符串，长度)
从字符串的右侧获取长度字符串。
LCase
LCase(字符串)
将字符串中的所有大写字母转换为小写字母。
UCase
UCase(字符串)
将字符串中的小写字母转换成大写字母。
StrComp
Strcomp(字符串1，字符串1)
返回string1字符串和string2字符串的比较结果，如果两个字符串相同，则返回0。
仪器
指令(字符串1，字符串2)
返回string1字符串中第一个出现的string2字符串。
裂开
Split(string1，分隔符
根据delimiter将字符串拆分成一维数组，其中delimiter用于表示子串边界的字符。如果省略，请使用空格("")作为分隔符。
替换
替换(string1，find，replacewith)
返回一个字符串，其中指定的子字符串(find)被另一个子字符串(replacewith)替换
常见的字符串函数和函数
功能
语法
功能
低输入联网（low-entry networking的缩写）
长度(字符串)
返回字符串中的字符数。
附加装饰
修剪(字符串)
删除字符串前后的空格。
Ltrim
Ltrim(字符串)
删除字符串前面的空格。
Rtrim
Rtrim(字符串)
删除字符串后的空格。
中间的
Mid(字符串，起始，长度)
从字符串的起始字符获取长度字符串。如果省略第三个参数，则表示从开始字符到字符串结尾的字符串。
左边的
左(字符串，长度)
从字符串string的左侧获取一个长度的字符串。
对吧
右(字符串，长度)
从字符串的右侧获取长度字符串。
LCase
LCase(字符串)
将字符串中的所有大写字母转换为小写字母。
UCase
UCase(字符串)
将字符串中的小写字母转换成大写字母。
StrComp
Strcomp(字符串1，字符串1)
返回string1字符串和string2字符串的比较结果，如果两个字符串相同，则返回0。
仪器
指令(字符串1，字符串2)
返回string1字符串中第一个出现的string2字符串。
裂开
Split(string1，分隔符
根据delimiter将字符串拆分成一维数组，其中delimiter用于表示子串边界的字符。如果省略，请使用空格("")作为分隔符。
替换
替换(string1，find，replacewith)
返回一个字符串，其中指定的子字符串(find)被另一个子字符串(replacewith)替换
常用的日期和时间函数及说明
功能
语法
功能
现在
现在()
获取系统的当前日期和时间。
日期
日期()
获取系统的当前日期。
时间
时间()
获取系统的当前时间
年
年份()
获取给定日期的年份。
月
月份(日期)
获取给定日期的月份。
一天
日(日期)
给定的日期是几号？
小时
小时(时间)
给定时间是几点？
分钟
分钟(时间)
给定时间是几分钟？
第二
秒(时间)
给定时间是几秒？
工作日
工作日(日期)
获取给定日期的星期几的整数。
1表示星期一。
2表示星期二。
连续类比
DateDiff
DateDiff("Var "，Var1，Var2)
Var:日期或时间间隔因子
1:第一次日期或时间
Var2:第二个日期或时间
计算两个日期或时间之间的间隔。
DateAdd
DateAdd("Var "，Var1，Var2)
Var:日期或时间间隔因子
1:日期或时间
Var2:日期或时间
添加两个日期或时间。
dateAdd ("d "，10，Date())什么是Date()) 10天？
格式日期时间
FortDateTime(日期，vbShortDate)
转换为短日期格式
FortDateTime(日期，vblongDate)
转换为长日期格式
FortDateTime(日期，vbShortTime)
转换为短时间格式
FortDateTime(日期，vbLongTime)
转换为长时间格式
或日期间隔因子。
间隔因子
yyyy
m
d
（同whitewater）白水
h
s
解释
年
月球
太阳
周
小时
第二
常见测试功能和功能
功能
功能
VarType(变体)
检查变量vriant的值。函数值是变量的数据子类型。0代表空值，2代表整数，7代表日，8代表字符串，11代表布尔变量，8192代表数组。
IsNumeric(变量)
检查变量variant的值。如果variant是数值类型，则函数值为true。
IsNull(变量)
检查变量variant的值。如果variant为null，则函数值为true。
IsEmpty(变体)
检查变量的值。如果variant为空，则函数值为true。
IsObject(变体)
检查变量variant的值。如果variant是对象类型，则函数值为true。
IsDate(变量)
检查变量variant的值。如果variant是日期类型，则函数值为true。
IsArray(变体)
检查变量variant的值。如果variant是数组类型，则函数值为true。
这里有一个常见的例子，你可以运行测试。
选项显式
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
CDate函数将合法的日期和事件表达式转换为日期类型，并返回结果。
尺寸d1
尺寸d2
Dim d3
D1=' 2001年4月22日'
如果IsDate(d1)则
MsgBox CDate(d1)
如果结束
D2=# 01年2月22日#
如果IsDate(d2)则
MsgBox CDate(d2)
如果结束
d3='凌晨3点18分40秒'
如果IsDate(d3)则
MsgBox CDate(d3)
如果结束
Date函数返回当前系统的日期。
日期
MsgBox日期
日期和时间
MsgBox现在
时间
MsgBox时间
DateAdd函数可以返回添加了指定时间间隔的日期。
Msox DateAdd ('yyyy '，1，' 31-Jan-2003 ')'加一年
Msox DateAdd ('yyyy '，1，' 31-Jan-2003 ')'减去一年
Msox DateAdd ('Q '，1，' 31-Jan-2003 ')'加上一个季度
Msox DateAdd ('m '，1，' 31-Jan-2003 ')'加上一个月
Msox DateAdd ('y '，1，' 31-Jan-2003 ')'一年中的第几天？
MsoxdateAdd ('d '，1，' 31-Jan-2003 ')'增加一天。
MSOxdateAdd ('W '，1，' 31-Jan-2003 ')'星期几？
MsoxdateAdd ('WW '，1，' 31-Jan-2003 ')'增加一周。
MSOxdateAdd ('h '，1，' 31-Jan-2003 ')'某个日期的第一个小时
MSOxdateAdd ('n '，1，' 31-Jan-2003 ')'日期的第一分钟
MSOxdateAdd ('s '，1，' 31-Jan-2003 ')'日期的第一秒。
DateDiff函数可以返回两个日期之间的时间间隔
MsgBox DateDiff('yyyy '，日期，' 2012年1月31日')
MsgBox DateDiff('q '，日期，' 2012年1月31日')
MsgBox DateDiff('m '，日期，' 2012年1月31日')
MsgBox DateDiff('y '，日期，' 2012年1月31日')
MsgBox DateDiff('d '，日期，' 2012年1月31日')
MsgBox DateDiff('w '，日期，' 2012年1月31日')
MsgBox DateDiff('ww '，日期，' 2012年1月31日')
MsgBox DateDiff('h '，日期，' 2012年1月31日')
MsgBox DateDiff('n '，日期，' 2012年1月31日')
MsgBox DateDiff('s '，日期，' 2012年1月31日')
DatePart函数可以返回给定日期的指定部分。
尺寸d
d=' 2012年10月2日16时25分56秒'
MsgBox日期部分(' yyyy '，d)
MsgBox日期部分(' m '，d)
MsgBox日期部分(' q '，d)
MsgBox日期部分(“w”，d)
MsgBox日期部分(' ww '，d)
MsgBox日期部分(' y '，d)
MsgBox日期部分(' s '，d)
MsgBox日期部分(“h”，d)
MsgBox日期部分(' n '，d)
MsgBox日期部分(' d '，d)
DateSerial函数可以返回指定年、月、日的子类型日期的变量。
MsgBox日期序列(2012，2，30)
DateValue函数返回日期类型
MsgBox日期值(' 2012年1月31日上午2:39:49 ')
“Day”函数可以返回1到31之间的数字，表示一个月中的天数。
邮件箱日期(日期)
FormatDateTime函数可以格式化并返回有效的日期或时间表达式。
MsgBox格式日期时间(现在，0)
MsgBox格式日期时间(现在，1)
MsgBox格式日期时间(现在，2)
MsgBox格式日期时间(现在，3)
MsgBox格式日期时间(现在，4)
“小时”函数可以返回一个0到23之间的数字，表示一天中的小时数。
信箱小时数(现在)
IsDate函数可以返回一个布尔值，指示计算得到的表达式是否可以转换为日期，如果表达式是日期或者可以转换为日期，则返回True，否则返回False。
MsgBox is date(“2012年3月15日”)
“Minute”函数返回一个表示一小时中的分钟数。
MsgBox分钟(现在)
“Month”函数返回代表一年中某月的数字。
MsgBox月(现在)
Second函数返回一个以分钟为单位的秒数。
MsgBox秒(现在)
时间函数可以返回当前系统时间。
MsgBox时间
计时器函数可以返回自午夜以来经过的秒数。
MsgBox定时器
TimeSerial函数可以将小时、分钟和秒组合成时间。
MsgBox时间序列(3，45，50)
“时间值”函数可以返回包含时间的日期子类型变量。
MsgBox时间值(现在)
“Weekday”函数可以返回一个数字，表示一周的天数，介于1和7之间。
MsgBox工作日(日期，0)
“WeekdayName”函数可以返回一周中指定日期的周名。
MsgBox WeekdayName(3)
MsgBox WeekdayName(Weekday(Date，1))
Year函数返回代表年份的数字。
MsgBox年份(日期)
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *转换功能* * * * * * * * * * * * * * * * * * * *
Asc函数可以将字符串中的第一个字母转换成相应的ANSI代码并返回结果。
MsgBox Asc('A ')
MsgBox Asc('a ')
CBool函数可以将表达式转换为布尔类型。
暗淡的
a=5
MsgBox CBool(a)
CByte函数可以将表达式转换为字节类型。
Dim b
b=134.12345
MsgBox CByte(b)
CCur函数可以将表达式转换为货币类型。
Dim c
c=12344 . 565656565665
MsgBox CCur(c)
CDbl函数可以将表达式转换为双精度类型。
Dim e
e=120。38860 . 68868886861
MsgBox CDbl(e)
' Chr函数可以将指定的ANSI字符代码转换成字符。
MsgBox Chr(65)
CInt函数可以将表达式转换为整数类型。
MsgBox CInt(12.3435)
CLng函数可以将表达式转换为长整型。
MsgBox CLng(12.676)
MsgBox CLng(12.243)
CSng函数可以将表达式转换为单精度类型。
MsgBox CSng(122.355465)
MsgBox CSng(21.23222)
CStr函数可以将表达式转换为字符串类型
MsgBox CStr(false)
MsgBox CStr(日期)
MsgBox CStr(空)
MsgBox CStr(错误)
* * * * * * * * * * * * * * * * * * * * * * * * * * * *格式函数* * * * * * * * * * * * * *
“FormatCurrency”函数可以使用系统控制面板中定义的货币符号返回一个货币值格式的表达式。
MsgBox格式货币(21.23456)
“FormatNumber”函数返回格式化为数字的表达式。
MsgBox格式编号(12.23456775，3)
“FormatPercent”函数可以返回格式化为百分比的表达式。
MsgBox格式百分比(3/7，3)
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
Abs函数可以返回指定数字的绝对值。
MsgBox Abs(-9)
Atn函数返回指定数字的正切值。
MsgBox Atn(9)
Cos函数可以返回指定数字的余弦值。
MsgBox Cos(9)
Exp函数可以是e的幂。
MsgBox Exp(2.3)
Fix函数可以返回指定数字的整数部分。
MsgBox修复(-6.325)
MsgBox Int(-6.325)
Log函数返回指定数据的自然对数。
MsgBox日志(10)
Rnd函数可以返回一个随机数，该随机数始终小于1，但大于或等于0。
MsgBox Rnd
Sgn函数可以返回带有指定数字符号的整数。
MsgBox Sgn(15)
MsgBox Sgn(-5)
MsgBox Sgn(0)
Sin函数返回指定数字的正弦值。
MsgBox Sin(9)
Sqr函数可以返回一个数的平方根。
MsgBox Sqr(9)
Tan函数可以返回指定数字的正切值。
博客谭(9)
* * * * * * * * * * * * * * * * * * * * * * * * * * * *数组函数* * * * * * * * * * * * * *
数组可以返回包含数组的变量。
暗淡排列
Arr=Array(1，2，3，4，5)
MsgBox Arr(0)
Filter函数可以返回一个从0开始的数组，该数组包含基于特定筛选条件的字符串数组的子集。
Dim Arr1(5)，b
Arr1(0)='星期六'
Arr1(1)='星期日'
Arr1(2)='星期一'
Arr1(3)='星期二'
Arr1(4)='星期三'
b=过滤器(Arr1，' n '，真)
MsgBox b(0)
MsgBox b(1)
MsgBox b(2)
ISArray函数可以返回一个布尔值，表明指定的变量是否是一个数组。如果变量是数组，则返回True否则，它返回False。
尺寸a(3)
a(0)=1
a(1)=2
a(2)=3
MsgBox IsArray(a)
Join函数可以返回一个由数组中一系列子字符串组成的字符串。
维度a(5)，b
a(0)='星期六'
a(1)='星期日'
a(2)='星期一'
a(3)='星期三'
a(4)='星期二'
b=过滤器(a，' n '，真)
MsgBox联接(b，'，')
' LBound函数可以返回指示数组维数的最小下标。(始终为0)
UBound函数可以返回指示数组维数的最大下标。
尺寸a(5)
MsgBox LBound(a)
MsgBox UBound(a)
Split函数可以返回一个基于0的一维数组，其中包含指定的子串。
Dim txt，a
txt='你好/世界！'
a=Split(txt，'/')
MsgBox a(0)
MsgBox a(1)
* * * * * * * * * * * * * * * * * * * * * * * * * * * *字符串函数* * * * * * * * * * * * * *
' InStr函数返回一个字符串在另一个字符串中的第一个匹配项。
尺寸文本，位置
txt='这是美好的一天！'
pos=InStr(4，txt，' is '，1)
MsgBox pos
' InStrRev函数可以返回一个字符串在另一个字符串中的第一个出现位置。搜索从字符串的末尾开始，但返回的位置从字符串的开头开始计数。
尺寸文本，位置
txt='这是美好的一天！'
pos=InStrRev(txt，' I '，-1，1)
MsgBox pos
LCase函数可以将指定的字符串转换为小写。
UCase函数可以将指定的字符串转换成大写。
Dim txt，pos1，pos2
txt='这是美好的一天！'
pos1=LCase(txt)
pos2=UCase(txt)
MsgBox pos1
MsgBox pos2
函数的作用是：从字符串的左边返回指定数量的字符。
函数的作用是：从字符串的右边返回指定数量的字符。
Dim txt，pos1，pos2
txt='这是美好的一天！'
pos1=Left(txt，5)
pos2=Right(txt，6)
MsgBox pos1
MsgBox pos2
Len函数返回字符串中的字符数。
尺寸文本，位置
txt='这是美好的一天！'
pos=Len(文本)
MsgBox pos
' LTrim函数可以删除字符串左边的空格。
' RTrim函数可以删除字符串右边的空格。
Trim函数可以删除字符串两端的空格。
Dim txt，pos1，pos2，pos3
txt='这是美好的一天！'
pos1=LTrim(txt)
pos2=RTrim(txt)
pos3=Trim(txt)
MsgBox pos1
MsgBox pos2
MsgBox pos3
MsgBox Len(pos1)
MsgBox Len(pos2)
MsgBox Len(pos3)
Mid函数可以从字符串中返回指定数量的字符。
Dim文本
txt='这是美好的一天！'
MsgBox Mid(txt，1，5)
MsgBox Mid(txt，2，5)
MsgBox Mid(txt，1)
MsgBox Mid(txt，5)
Replace函数可以用一个字符串替换另一个字符串指定的次数。
Dim文本
txt='这是美好的一天！'
MsgBox Replace(txt，' is '，' AA '，4，2)
“Space”函数可以返回由指定数量的空格组成的字符串。
Dim文本
txt=Space(20)
MsgBox文本
MsgBox Len(txt)
StrComp函数可以比较两个字符串，并返回表示比较结果的值。
Dim txt1，txt2
txt1='你好'
txt2='地狱'
MsgBox StrComp(txt1，txt2)
' String函数可以返回包含指定长度的重复字符的字符串。
MsgBox字符串(10，' * ')
StrReverse函数可以反转一个字符串。
Dim文本
txt='这是美好的一天！'
MsgBox StrReverse(txt)
* * * * * * * * * * * * * * * * * * * * * * * * * * * *其他功能* * * * * * * * * * * * * * * * * *
InputBox函数显示一个对话框，用户可以在其中输入文本或单击按钮。
模糊名称
fname=InputBox('输入您的姓名：')
MsgBox('你的名字是' fname ')
“IsEmpty”函数可以返回指定变量是否已初始化的布尔值。
维度x，y
y=10
MsgBox IsEmpty(x)
MsgBox IsEmpty(y)
“IsNull”函数可以返回一个布尔值，该值指定表达式是否为无效数据。
维度x，y，z
x=空
y=10
z=' '
MsgBox为空(x)
MsgBox为空(y)
MsgBox IsNull(z)
IsNumeric函数可以返回一个布尔值，该值指示指定的表达式是否可以计算为数字。
尺寸x
x=10
MsgBox IsNumeric(x)
x=空
MsgBox IsNumeric(x)
x='1小时'
MsgBox IsNumeric(x)
关于vbscript常用函数的这篇文章在这里，希望大家以后能支持我们。
郑重声明：本文由网友发布，不代表盛行IT的观点，版权归原作者所有，仅为传播更多信息之目的，如有侵权请联系，我们将第一时间修改或删除，多谢。