vb常用函数大全

常用内部函数

数学函数

函数	功能	示例	结果	说明
Abs(x)	绝对值	Abs(-50.3)	50.3
Exp(x)	自然指数	Exp(2)	e*e	e（自然对数的底）的某次方
Fix(x)	取整(取参数的整数部分)	Fix(-99.8)	-99
Int(x)	取整(取小于或等于参数的最大整数)	Int(-99.8)   Int(99.8)	-100   99
Log(x)	常用对数	Log(1)	0	求自然对数值
Rnd	随机产生0～1的单精度值	Int(6*Rnd)+1	1～6	要产生一个从Min到Max的整数，应使用公式Int((Max-Min+1)*Rnd+Min)
Round(x,n)	按小数位数四舍五入	Round(3.14159,3)	3.142	第2个参数为小数位数
Sgn(x)	取参数的符号值	Sgn(8.8)   Sgn(-8.8)   Sgn(0)	1   -1   0	参数大于0，返回1   参数小于0，返回-1   参数等于0，返回0
Sin(x)	正弦	Sin(3.14159265/180*90)	1	三角函数以“弧度”为单位
Cos(x)	余弦	Cos(3.14159265/180*180)	-1
Atn(x)	计算反正切	Atn(1)	0.7854
Tan(x)	计算正切	Tan(3.14159265/180*45)	1
Sqr(x)	算术平方根	Sqr(9)	3	相当于

字符串函数

函数	功能	示例	结果	说明
Len(x)	求字符串的长度(字符个数)	Len("Vb技术")	4
LenB(x)	求字符串的字节个数	LenB("Vb技术")	8	VB中采用Unicode（ISO字符标准）来存储字符，所有字符都占2个字节
Mid(x,n1,n2)	从x字符串左边第n1个位置开始向右取n2个字符	Mid("Vb技术",2,2)	"b技"
Left(x,n)	从x字符串左边开始取n个字符	Left("Vb技术",3)	"Vb技"
Right(X,n)	从x字符串右边开始取n个字符	Right("Vb技术",3)	"b技术"
UCase(x)	将x字符串中所有小写字母转换为大写	UCase("Vb技术")	"VB技术"
LCase(x)	将x字符串中所有大写字母转换为小写	LCase("Vb技术")	"vb技术"
Trim(x)	去掉x字符串两边的空格	Trim("  Vb 技术 ")	"Vb  技术"
Ltrim(x)	去掉x字符串左边的空格	Ltrim("  Vb 技术 ")	"Vb  技术 "
Rtrim(x)	去掉x字符串右边的空格	Rtrim("  Vb 技术 ")	"  Vb 技术"
Instr(x1,x2,M)	返回字符串x2在字符串x1中的位置，M=1不区分大小写,省略则区分	Instr("baBBAC","BA")	4	找不到则返回0
String(n,x)	返回由n个首字符组成的字符串	String(3,"AB")	"AAA"
Space(n)	返回n个空格	Space(3)	"     "

日期和时间函数

函数	功能	示例	结果	说明
Date	返回系统日期	Date	2006-9-1	(yyyy-mm-dd)
Time	返回系统时间	Time	15:45:33	(hh:mm:ss)
Now	返回系统日期和时间	Now	2006-9-1  15:45:33	(yyyy-mm-dd  hh:mm:ss)
Year(c)	返回指定日期的年份	Year("2006-9-1")或   Year(#9/1/2006#)	2006
Month(c)	返回指定日期的月份	Month("2006-9-1")	9
Day(c)	返回指定日期的日子	Day("2006-9-1")	1
Weekday()	返回指定日期的星期几	Weekday("2006-9-1")	6	星期日为1
Hour()	返回指定时间的时数	Hour("15:45:33")	15
Minute()	返回指定时间的分数	Minute(Now)	45	假定系统时间为15:45:33

增减日期函数： DateAdd(要增减日期形式，增减量，要增减的日期)
例：计算2周后的日期：DateAdd("ww",2,#9/1/2006#)，结果"2006-9-15"
求日期之差函数： DateDiff(要间隔日期形式，日期一，日期二)
例：计算生日还有多少天：DateDiff("d", Now, #12/1/2006#) ，结果为 74
函数中的“要增减日期形式”或“要间隔日期形式”可参见下表中的形式：

日期形式	yyyy	q	m	y	d	w	ww	h	n	s
意义	年	季	月	一年的天数	日	一周的天数	星期	时	分	秒

数据类型转换函数

函数	功能	示例	结果	说明
Str(x)	将数值转换为字符串	Str(45.2)	"45.2"
Val(x)	将字符串中的数字转换成数值	Val("2.3ab")   Val("a23")	2.3   0
Asc(x)	求字符ASCII值	Asc("a")	97
Chr(x)	将数值（ASCII码）转换为字符	Chr(65)	"A"
CBool(x)	将数字字符串或数值转换成布尔型	CBool(1)   CBool("0")	True   False	等于0为False，不等于0为True
CDate(x)	将有效的日期字符串转换成日期	CDate(#1990,2,23#)	"1990-2-23"
CSng(x)	将数值转换成单精度型	CSng(23.5125468)	23.51255
CDbl(x)	将数值转换成双精度型	CDbl(23.5125468)	23.5125468

(一)类型转换类函数
1. CType(X)
[格式]：
P=CBool(X)
' 将X转换为"布尔"(Boolean)类型
P=CByte(X)
' 将X转换为"字节"(Byte)类型
P=CCur(X)
' 将X转换为"金额"(Currency)类型
P=CDate(X)
' 将X转换为"日期"(Date)类型
P=CDbl(X)
' 将X转换为"双精度"(Double)类型
P=CInt(X)
' 将X转换为"整型"(Integer)类型
P=CLng(X)
' 将X转换为"长整型"(Long)类型
P=CSng(X)
' 将X转换为"单精度"(Single)类型
P=CStr(X)
' 将X转换为"字符串"(String)类型
P=Cvar(X)
' 将X转换为"变体型"(Variant)类型
P=CVErr(X)
' 将X转换为Error值
[ 范例 ]：
(1). CStr(13)+CStr(23)
' 数值转换成字符串后，用"+"号连接， 结果：1323
(2). CInt("12")+12
' 字符串转换成整型后与12相加， 结果：24
(3). P=CInt(True)
' 输出结果为-1
' 布尔值与数值的转换时要注意，布尔值只有True和False，其中True在内存中为-1,False存为0
(4). CBool(-0.001)
' 输出结果为True
' 将数值转换为布尔型时，等于0的数值将得到False，不等于0的数值得到True.

2. Int(X),Fix(X)：取X的整数值
[格式]：
P=Int(X) ' 取<=X的最大整数值
P=Fix(X) ' 取X的整数部分，直接去掉小数
[范例]：
(1) Int(-54.6)
' 结果为-55，取<=-54.6的最大整数
(2) Fix(54.6)
' 结果为54，取整数并直接去掉小数

(二)常用数学函数
[格式]：
1. Abs(N) 取绝对值
例：Abs(-3.5) 结果：3.5
2. Cos(N) 余弦函数
例：Cos(0) 结果：1
3. Exp(N) e为底的指数函数
例：Exp(3) 结果：20.068
4. Log(N) 以e为底的自然对数
例：Log(10) 结果：2.3
5. Rnd[(N) 产生随机数
例：Rnd 结果：0--1之间的数
6. Sin(N) 正弦函数
例：Sin(0) 结果：0
7. Sgn(N) 符号函数
' 说明：取正负号。Y=Sgn(X) 既 X>0 则Y=1；X=0 则Y=0；X<0 则Y= -1
8. Sqr(N) 平方根
例：Sqr(9) 结果：3
9. Tan(N) 正切函数
例：Tan(0) 结果：0
10.Atn(N) 反切函数
例：Atn(0) 结果：0
[注意]：在三角函数中，以弧度表示。
(一)字符串类函数：
1. ASC(X)，Chr(X)：转换字符字符码
[格式]：
P=Asc(X) 返回字符串X的第一个字符的字符码
P=Chr(X) 返回字符码等于X的字符
[范例]：
(1)P=Chr(65)
'输出字符A,因为A的ASCII码等于65
(2)P=Asc("A")
'输出65

2. Len(X)：计算字符串X的长度
[格式]：
P=Len(X)
[说明]：
空字符串长度为0，空格符也算一个字符，一个中文字虽然占用2 Bytes，但也算一个字符。
[范例]：
(1) 令X="" (空字符串)
Len(X) 输出结果为0
(2) 令X="abcd"
Len(X) 输出结果为4
(3) 令X="VB教程"
Len(X) 输出结果为4

3. Mid(X)函数：读取字符串X中间的字符
[格式]：
P=Mid(X,n)
由X的第n个字符读起，读取后面的所有字符。
P=Mid(X,n,m)
由X的第n个字符读起，读取后面的m个字符。
[范例]：
(1) X="abcdefg"
P=Mid(X,5)
结果为：P="efg"
(2) X="abcdefg"
P=Mid(X,2,4)
结果为P="bcde"

4. Replace： 将字符串中的某些特定字符串替换为其他字符串
[格式]：
P=Replace(X,S,R)
[说明]：将字符串X中的字符串S替换为字符串R，然后返回。
[范例]：
X="VB is very good"
P=Replace(X,good,nice)
输出结果为：P="VB is very nice"

5. StrReverse：反转字符串
[格式]：
P=StrReverse(X)
[说明]：
返回X参数反转后的字符串
[范例]：
(1)X="abc"
P=StrReverse(X)
输出结果：P="cba"

6. Ucase(X)，Lcase(X)：转换英文字母的大小写
[格式]：
P=Lcase(X)
'将X字符串中的大写字母转换成小写
P=Ucase(X)
'将X字符串中的小写字母转换成大写
[说明]：除了英文字母外，其他字符或中文字都不会受到影响。
[范例]：
(1) 令 X="VB and VC"
则Lcase(X)的结果为"vb and vc"，Ucase(X)的结果为"VB AND VC"

7. InStr函数：寻找字符串
[格式]：
P=InStr(X,Y)
从X第一个字符起找出Y出现的位置
P=InStr(n,X,Y)
从X第n个字符起找出Y出现的位置
[说明]：
(1) 若在X中找到Y，则返回值是Y第一个字符出现在X中的位置。
(2) InStr(X,Y)相当于InStr(1,X,Y)。
(3) 若字符串长度，或X为空字符串，或在X中找不到Y，则都返回0。
(4) 若Y为空字符串，则返回0。

函数名称                                                 函数功能
Cbool(string)                                           转换为布尔值
Cbyte(string)                                           转换为字节类型的值
Ccur(string)                                             转换为货币类值
Cdate(string)                                           转换为日前类型的值
Cdbl(string)                                             转换为双精度值
Cint(string)                                               转换为整数值
Clng(string)                                              转换为长整型的值
Csng(string)                                             转换为单精度的值
Cstr(var)                                                 转换为字符串值
Str(var)                                                   数值转换为字符串
Val(string)                                               字符串转换为数值
***************************************
Abs(nmb)                                                返回数子的绝对值
Atn(nmb)                                                 返回一个数的反正切
Cos(nmb)                                                返回一个角度的余炫值
Exp(nmb)                                                返回自然指数的次方值
Int(nmb)                                                  返回数字的整形（进位）部份   8.4-->9
Fix(nmb)                                                 返回数字的整形（舍去）部份   8.4-->8
Formatpercent(表达式)                          返回百分比
Hex(nmb)                                                返回数据的16进制数
Log(nmb)                                                返回自然对数
Oct(nmb)                                                返回数字的8进制数
Rnd                                                         返回大于“0”而小于“1”的随机数
Sgn(nmb)                                                判断一个数字的正负号
Sin(nmb)                                                 返回角度的正铉值
Sqr(nmb)                                                返回数字的二次方根
Tan(nmb)                                                返回一个数的正切值
Asc(string)                                              返回ASCII字符串
Chr(charcode)                                        根据字符代码返回字符
Instr(string,searchstr)                              返回被搜索字符串的第一个字符位置，string是字符串，searchstr是被搜索的字符串
InstrRev(string,searchstr)                        同上，只是从右面开始搜索
Lcase(var)                                             把字符串变为小写
Left(string,nmb)                                     从string中返回从左面开始的nmb个字符串
Len(string)                                             返回字符串的长度
Ltrim(string)                                           截去字符串左边的空格
Filter(inputstrings,value)                         返回字符串数组的字集，Inputstrings是字符串组，value是在数组中寻找的字符
Rtrim(string)                                          截去字符串右边的空格
Trim(string)                                           截去字符串前后空格
Mid(string,start,len)                               在string中返回从start位置开始的len个字符
Replace(string,find,withstr)                   在字符串string中，用withstr来替换find字符串
Right(string,nmb)                                  从string中返回从右面开始的nmb个字符串
Space(nmb)                                          返回指定空格的字符串
StrComp(string1,string2)                       比较两个字符串
Ucase(string)                                        把字符串变为大写
****************************************
Date()                                                 返回当前系统日期
DateAdd(interval,nmb,date)                 用一个基础时间返回指定增加了时间间隔的日期，interval是间隔类型，yyyy－年，m－月，d－日，h－小时，n－分。
DateDiff(interval,nmb1,nmb2)             返回两个时间间隔，interval的意思同上
Datevalue(date)                                  发挥Date中的日期部份
Day(date)                                           返回天数
FormatDatetime(date)                        返回格式化为日期的表达式
Hour(time)                                         返回时间的小时数
Minute(time)                                      返回时间的分钟数
Month(date)                                      返回日期中的月份
Now()                                               返回系统的日期和时间
Second(time)                                     返回时间中的秒数
Time()                                               返回系统的当前时间
Weekday(date)                                 返回星期几
WeekdayName(date)                        返回星期几的中文名
Year(date)                                         返回年份
IsArray(var)                                       判断一个变量是否是数组
IsDate(var)                                        判断一个变量是否是日期
IsNull(var)                                         判断一个变量是否为空
IsNumeric                                          判断表达式是否包含数值
IsObject(var)                                     判断一个变量是否是对象
TypeName(var)                                 返回变量的数据类型
************************************
Array(list)                                        返回数组
CreateObject(class)                         创建一个对象
GetObject(pathfilename)                  得到文件对象
Inputbox(prompt)                            提供一个可供输入数据的对话框
LBound(arrayP)                              返回数组的最小索引
Msgbox(string)                                输出一个消息框
Split(liststr)                                      从一个列表字符串中返回一个一维数组
Ubound(array)                                返回数组的最大索引