《VB数据类型转换函数》由会员分享，可在线阅读，更多相关《VB数据类型转换函数（8页珍藏版）》请在金锄头文库上搜索。
1、(一)类型转换类函数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)类
2、型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的
3、最大整数值P=Fix(X) 取X的整数部分，直接去掉小数范例：(1) Int(-54.6) 结果为-55，取0 则Y=1；X=0 则Y=0；X0 则Y= -18. Sqr(N) 平方根例：Sqr(9) 结果：39. Tan(N) 正切函数例：Tan(0) 结果：010.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
4、(A)输出652. 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) 输出结果为43. Mid(X)函数：读取字符串X中间的字符格式：P=Mid(X,n)由X的第n个字符读起，读取后面的所有字符。P=Mid(X,n,m)由X的第n个字符读起，读取后面的m个字符。范例：(1) X=abcdefgP=Mid(X,5)结果为：P=efg(2) X=abcdef
5、gP=Mid(X,2,4)结果为P=bcde4. Replace： 将字符串中的某些特定字符串替换为其他字符串格式：P=Replace(X,S,R)说明：将字符串X中的字符串S替换为字符串R，然后返回。范例：X=VB is very goodP=Replace(X,good,nice)输出结果为：P=VB is very nice5. StrReverse：反转字符串格式：P=StrReverse(X)说明：返回X参数反转后的字符串范例：(1)X=abcP=StrReverse(X)输出结果：P=cba6. Ucase(X)，Lcase(X)：转换英文字母的大小写格式：P=Lcase(X)将X
6、字符串中的大写字母转换成小写P=Ucase(X)将X字符串中的小写字母转换成大写说明：除了英文字母外，其他字符或中文字都不会受到影响。范例：(1) 令 X=VB and VC则Lcase(X)的结果为vb and vc，Ucase(X)的结果为VB AND VC7. 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
7、，则都返回0。(4) 若Y为空字符串，则返回0。(二)日期时间类函数：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:23P=Hou
8、r(X)Q=Minute(X)R=Second(X)则输出结果：P=10，Q=34，R=233. 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/024TimeSerial函数：合并时，分，秒成为时间格式：P=Tim
9、eSerial(H,M,S)其中H为小时数，M为分钟数，S为秒数说明：推算原理同上面的DateSerial范例：P=TimeSerial(6,32,45)结果为：P=6:32:455Date,Time,Now函数：读取系统的日期时间格式：P=Date()P=Time()P=Now()说明：这三个函数都无参数范例：若当前时间为2003年8月29日晚上19点26分45秒，则P=Now()结果为：P=2003-08-29 19:26:456MonthName：返回月份名称格式：P=MonthName(X)说明：X参数可传入1-12，则返回值为一月、二月，但是在英文Windows环境下，返回的是Jan
10、uary,February范例：P=MonthName(1)则P=一月7WeekdayName：返回星期名称格式：P=WeekdayName(X)说明：X参数可传入17，则返回值为星期日，星期一，但是在英文windows环境下，返回的是Sunday,Monday范例：P=WeekdayName(1)结果为：P=星期日 函数名称 函数功能 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)
