VB6.0常用内部函数

1、vb6.0 常用内部函数数学函数函数功能示例结果说明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 随机产生01 的单精度值int(6*rnd)+1 16 要产生一个从min 到 max的整 数 ，应使 用公式int(max-min+1)*rnd+min)

2、 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、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 字符串

4、中所有小写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) 返

5、回由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

6、) 返回指定日期的日子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(要间隔日期形式，日期一，日期二) 例：计算生日还有多少天： dat

7、ediff(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) 2.3 val(a23) 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) 将有效的日期字符串转换成日期cdat