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