VB函数分类.docx
- 文档编号:28884652
- 上传时间:2023-07-20
- 格式:DOCX
- 页数:9
- 大小:16.53KB
VB函数分类.docx
《VB函数分类.docx》由会员分享,可在线阅读,更多相关《VB函数分类.docx(9页珍藏版)》请在冰豆网上搜索。
VB函数分类
(一)类型转换类函数
cstr()数值转换成字符串
val()字符串转换成数值
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
Trim(X)
去除该字串符的头尾空格
2.Len(X):
计算字符串X的长度
[格式]:
P=Len(X)
[说明]:
空字符串长度为0,空格符也算一个字符,一个中文字虽然占用2Bytes,但也算一个字符。
[范例]:
(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=”VBisverygood”
P=Replace(X,good,nice)
输出结果为:
P=”VBisverynice”
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=”VBandVC”
则Lcase(X)的结果为”vbandvc”,Ucase(X)的结果为”VBANDVC”
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。
InStrRev函数:
返回字串符最后一次出现的位置
格式
P=InStrRev(字串符,查找字串符,起始位置)
日期时间类函数:
1.Year(X),Month(X),Day(X):
取出年,月,日
[格式]:
P=Year(X)
取出X“年”部分的数值
P=Month(X)
取出X“月”部分的数值
P=Day(X)
取出X“日”部分的数值
[说明]:
Year返回的是公元年,若X里只有时间,没有日期,则日期视为#1899/12/30#
2.Hour,Minute,Second函数:
取出时,分,或秒
[格式]:
P=Hour(X)
取出X“时”部分的数值
P=Minute(X)
取出X“分”部分的数值
P=Second(X)
取出X“秒”部分的数值
[说明]:
Hour的返回值是0---23之间
[范例]:
X=10:
34:
23
P=Hour(X)
Q=Minute(X)
R=Second(X)
则输出结果:
P=10,Q=34,R=23
3.DateSerial函数:
合并年,月,日成为日期
[格式]:
DateSerial(Y,M,D)
其中Y是年份,M为月份,D为日期
[说明]:
(1)M值若大于12,则月份从12月起向后推算M-12个月;若小于1,则月份从1月起向后推算1-M个月。
(2)若日期D大于当月的日数,则日期从当月的日数起,向后推算D-当月日数;若小于1,则日期从1日起向前推算1-D日。
[范例]:
P=DateSerial(2000,02,02)
则结果为P=2000/02/02
4.TimeSerial函数:
合并时,分,秒成为时间
[格式]:
P=TimeSerial(H,M,S)
其中H为小时数,M为分钟数,S为秒数
[说明]:
推算原理同上面的DateSerial
[范例]:
P=TimeSerial(6,32,45)
结果为:
P=6:
32:
45
5.Date,Time,Now函数:
读取系统的日期时间
[格式]:
P=Date()
P=Time()
P=Now()
[说明]:
这三个函数都无参数
[范例]:
若当前时间为2003年8月29日晚上19点26分45秒,则
P=Now()
结果为:
P=2003-08-2919:
26:
45
6.MonthName:
返回月份名称
[格式]:
P=MonthName(X)
[说明]:
X参数可传入1---12,则返回值为“一月”、“二月”……,但是在英文Windows环境下,返回的是”January”,”February”……
[范例]:
P=MonthName
(1)
则P=“一月”
7.WeekdayName:
返回星期名称
[格式]:
P=WeekdayName(X)
[说明]:
X参数可传入1—7,则返回值为“星期日”,“星期一”……,但是在英文windows环境下,返回的是”Sunday”,”Monday”……
[范例]:
P=WeekdayName
(1)
结果为:
P=”星期日”
标题VB常用函数辑
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 函数 分类