原文地址:)类型转换类函数 1. ctype(x) [格式]: p=cbool(x) 将x转换为"布尔"(boolean)类型 p=cbyte(x) 将x转换为"字节"(byte)类型 p=cc r(x) 将x转换为"金额"(c rrency)类型 p=cdate(x) 将x转换为"日期"(date)类型 p=cdbl(x) 将x转换为"双精度"(do ble)类型 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(tr e) 输出结果为-1 布尔值与数值的转换时要注意,布尔值只有tr e和false,其中tr e在内存中为-1,false存为0 (4). cbool(-0.001) 输出结果为tr e 将数值转换为布尔型时,等于0的数值将得到false,不等于0的数值得到tr e. 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) 既 x0 则y=1;x=0 则y=0;x0 则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. 日期时间类函数: 1. year(x),month(x),day(x):取出年,月,日 [格式]: p=year(x) 取出x"年"部分的数值 p=month(x) 取出x"月"部分的数值 p=day(x) 取出x"日"部分的数值 [说明]:year返回的是公元年,若x里只有时间,没有日期,则日期视为#18991230# 2. ho r,min te,second函数:取出时,分,或秒 [格式]: p=ho r(x) 取出x"时"部分的数值 p=min te(x) 取出x"分"部分的数值 p=second(x) 取出x"秒"部分的数值 [说明]:ho r的返回值是023之间 [范例]: x=10:34:23 p=ho r(x) q=min te(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日.