常用内部函数
数学函数
示例
|
结果
|
说明
|
||
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 | 返回系统日期 | 2006-9-1 | (yyyy-mm-dd) | |
Time | 返回系统时间 | 15:45:33 | (hh:mm:ss) | |
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 |
例:计算2周后的日期:DateAdd("ww",#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,23#) | "1990-2-23" | |
CSng(x) | 将数值转换成单精度型 | CSng(23.5125468) | 23.51255 | |
CDbl(x) | 将数值转换成双精度型 | CDbl(23.5125468) | 23.5125468 |
有问题或者想了解更多的朋友请加入群 VB学习交流群 531161726
既然来了,就留下你的脚印呗。。。。。。