VB常用函数大全.doc

1、学无 止境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)Ti

2、me设置当前时间例：Time = 下午 09: 11: 00”Now返回当前日期和时间Year从日期中提取年份例：Myyear = Year ( 75/06/13 ”)返回值为 1975Month从日期中提取月份同上Weekday;从日期中提取星期数例：Myweekday=weekday( Oct 16,98")值为 6,周五Day从日期中提取天数同前Hour从时间中提取小时数例：Myhour=Hour( pm 09:30:00")值为 21Minute从时间中提取分钟数同上Second从时间中提取秒数同上Formatdatetime对日期和时间格式化MonthName返回

3、月份的名称例：Mymonthname=monthname(10) 值为"十月”WeekdayName返回星期数的名称同上DateAddDateDiff计算两个日期之间差例：my=datediff( d”,"75/6/13 ",”98/10/16")值为 8526DatePart返回某一日期某部分例：my=datepart( *","98/10/16")值为 4,第四季度Timer从午夜到现在经过秒 数的单精度点数，一般 用来控制时间例：start=TimerDo While Timer < Strat + 5DoEve

4、ntsLoop程序用来暂停5秒3.目录和文件函数函数说明例子ChDir改变当前目录Chdir C:windows ”ChDrive改变当前驱动器CurDir返回当前目录MkDir创建目录MkDir C:my documentsvb6 ”RmDir删除目录（目录为空）FileCopy拷贝文件FileCopy C:temp.txt", C:my documentst1.txt”Kill删除文件（可删多个）Kill C:my documentsvb6*.* "FileLen取得文件的长度（字节）Dir查找指定的文件和目录Dir（文件名，文件特征）4.交互式函数（1） Msgbox

5、 （消息，按钮，标题）返回值值按钮vbOK1确定vbCancel2取消vbAbort3放弃vbRetry4重试vbIgnore5忽略vbYes6是vbNo7否（2） InputBox（消息，标题，缺省值）5.数学函数函数说明例子Abs返回绝对值Abs(-5) =5Sgn返回参数的符号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)=6Fix返回小数的整数部分Fix(5.7)=5;Fix(-5.7)=-5Int同

6、上（相反）Int(5.7)=5;Int(-5.7)=-6Sqr计算某数的开平方值Sqr(16)=4Exp计算以e为底的指数的 值Exp (2) =7.38905609893065Log计算以e为底的对数的 值Log(2)/Log(10)=0.301029 表示以10为底2的对数值Sin,Cos,Tan,Atn计算对应参数的值Rnd产一个01间随机数卜面广生ab之间的随机数Int （Rnd * （b-a+1） + a要使用Randomize来初始化随机数，防产生相同数列6.颜色函数(1)QBColor(根据015返回最基本的16种颜色之一)数值颜色常量数值颜色常量0黑色vbBlack8灰色1蓝色

7、9亮蓝色vbBlue2绿色10亮绿色vbGreen311亮青色vbCyan4红色12亮红色vbRed5洋红色13亮洋红色vbMagenta6原;色14亮黄色vbYellow7白色15亮白色vbWhite(2)RGB(返回的颜色总数为2563=224=16777216种)RGB(255,255,0)7.字符串函数函数说明例子Len返回字符串长度Len( Hello ")=5Lcase字符串所有字母变小写Lcase( Hello ”尸helloUcase字符串所有字母变大写Lcase( hello")=HELLOStrReverse字符串反向StrReverse( hello")= "olleh”LTrimRTrim,Trim将字符左辿右边或两 边的空格清除Trim( " hello")= "hello”Left从左辿截取字符串Left( hello,4 ")="hell"Right从右辿截取字符串Right( hello,2")="lo"Mid从中间截取字符串Mid(