VB常用函数大全
1． 类型转换函数
Cbool 将表达式转换为布尔型 Cbyte 转换为字节型
Ccur 转换为货币型 Cdate 转换为日期型
Cdbl 转换为双精度浮点型 Cint 转换为整形
Clng 转换为长整型 Csng 转换为单精度型
Cstr 转换为字符串型 Cvar 转换为变体型
2． 日期和时间函数
函数 | 说明 | 举例 |
Date | 返回当前日期 | |
DateSerial | 返回任意日期 | 例：Mydate = dateseral (1975,6,13) |
Date | 设置当前日期 | 例：Date = “ 98/10/16 ” |
Time | 返回当前时间 | |
Timeserial | 返回任意时间 | 例：Mytime = Timeserial (20,45,39) |
Time | 设置当前时间 | 例：Time = “下午 09：11：00” |
Now | 返回当前日期和时间 | |
Year | 从日期中提取年份 | 例：Myyear = Year ( “75/06/13 ”) 返回值为1975 |
Month | 从日期中提取月份 | 同上 |
Weekday | 从日期中提取星期数 | 例：Myweekday=weekday(“Oct 16,98”) 值为6，周五 |
Day | 从日期中提取天数 | 同前 |
Hour | 从时间中提取小时数 | 例：Myhour=Hour(“pm 09:30:00”) 值为21 |
Minute | 从时间中提取分钟数 | 同上 |
Second | 从时间中提取秒数 | 同上 |
Formatdatetime | 对日期和时间格式化 | |
MonthName | 返回月份的名称 | 例：Mymonthname=monthname(10) 值为”十月” |
WeekdayName | 返回星期数的名称 | 同上 |
DateAdd | ||
DateDiff | 计算两个日期之间差 | 例：my=datediff(“d”,”75/6/13”,”98/10/16”)值为8526 |
DatePart | 返回某一日期某部分 | 例：my=datepart(“q”,”98/10/16”)值为4，第四季度 |
Timer | 从午夜到现在经过秒数的单精度点数，一般用来控制时间 | 例：start=Timer Do While Timer < Strat + 5 DoEvents Loop 程序用来暂停5秒 |
3． 目录和文件函数
函数 | 说明 | 例子 |
ChDir | 改变当前目录 | Chdir “c:\windows” |
ChDrive | 改变当前驱动器 | |
CurDir | 返回当前目录 | |
MkDir | 创建目录 | MkDir “c:\my documents\vb6” |
RmDir | 删除目录（目录为空） | |
FileCopy | 拷贝文件 | FileCopy “c:\”, “c:\my ” |
Kill | 删除文件（可删多个） | Kill “c:\my documents\vb6\*.*” |
FileLen | 取得文件的长度（字节） | |
Dir | 查指定的文件和目录 | Dir(文件名，文件特征) |
4． 交互式函数
（1）Msgbox (消息，按钮，标题)
返回值 | 值 | 按钮 |
vbOK | 1 | 确定 |
vbCancel | 2 | 取消 |
vbAbort | 3 | 放弃 |
vbRetry | 4 | 重试 |
vbIgnore | 5 | 忽略 |
vbYes | 6 | 是 |
vbNo | 7 | 否 |
（2）InputBox(消息，标题，缺省值)
5． 数学函数
函数 | 说明 | 例子 |
Abs | 返回绝对值 | Abs(-5) =5 |
Sgn | 返回参数的符号 | Sgn(-5)= -1; Sgn(0-5)= 0; Sgn(5)= 1; |
Round | 返回小数四舍五入数 | Rornd(5.4)=5; Rornd(-5.7)=-6; Rornd(5. 7864,3)=5.786; Rornd(5. 7864)=6 |
Fix | 返回小数的整数部分 | Fix(5.7)=5;Fix(-5.7)=-5 |
Int | 同上（相反） | Int(5.7)=5;Int(-5.7)=-6 |
Sqr | 计算某数的开平方值 | Sqr(16)=4 |
Exp | 计算以e为底的指数的值 | Exp（2）=7.38905609893065 |
Log | 计算以e为底的对数的值 | Log(2)/Log(10)=0.301029表示以10为底2的对数值 |
| datediff是字符型函数 Sin,Cos,Tan,Atn | 计算对应参数的值 | |
Rnd | 产生一个0~1间随机数 | 下面产生a~b之间的随机数 Int (Rnd * (b-a+1)) + a 要使用Randomize来初始化随机数,防产生相同数列 |
6． 颜函数
(1)QBColor(根据0~15返回最基本的16种颜之一)
数值 | 颜 | 常量 | 数值 | 颜 | 常量 |
0 | 黑 | vbBlack | 8 | 灰 | |
1 | 蓝 | 9 | 亮蓝 | vbBlue | |
2 | 绿 | 10 | 亮绿 | vbGreen | |
3 | 青 | 11 | 亮青 | vbCyan | |
4 | 红 | 12 | 亮红 | vbRed | |
5 | 洋红 | 13 | 亮洋红 | vbMagenta | |
6 | 黄 | 14 | 亮黄 | vbYellow | |
7 | 白 | 15 | 亮白 | vbWhite | |
(2)RGB(返回的颜总数为2563=224=16777216种)
RGB(255,255,0)
7． 字符串函数
函数 | 说明 | 例子 |
Len | 返回字符串长度 | Len(“Hello”)=5 |
Lcase | 字符串所有字母变小写 | Lcase(“Hello”)=hello |
Ucase | 字符串所有字母变大写 | Lcase(“hello”)=HELLO |
StrReverse | 字符串反向 | StrReverse(“hello”)=”olleh” |
LTrim RTrim,Trim | 将字符左边\右边或两边的空格清除 | Trim(“ hello”)=”hello” |
Left | 从左边截取字符串 | Left(“hello,4”)=”hell” |
Right | 从右边截取字符串 | Right(“hello,2”)=”lo” |
Mid | 从中间截取字符串 | Mid(“hello”,2,3)=”ell” |
Space | 返回空格字符串 | Space(3)=” ” 三个空格 |
String | 以单一字填充字符串 | String(4,”*”)=”****” |
StrConv | ||
StrComp | ||
Replace | ||
Split | ||
版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。
发表评论