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