vb常用函数
一、算术函数
1、Abs(<表达式>)
返回数值表达式的绝对值。
如:Abs(-3)=3
2、Int(<数值表达式>)
向下取整。
如:Int(3.25)=3,Int(-3.25)=-4
3、Fix(<数值表达式>)
取整函数。
如:Fix(3.25)=3,Fix(-3.25)=-3
4、Round(<数值表达式>[,<表达式>])
按指定位数四舍五入。
如:Round(3.2553,1)=3.3,Round(3.754,0)=4
5、sqr(<数值表达式>)
计算平方根。
如:sqr(9)=3
6、Rnd(<数值表达式>)
Int(Rnd*(b-a)+a ):      在[a,b )区间内产生随机整数
Randomize[(x)] :      
如:   
    产生1-100的随机数:      Int(Rnd *100)+1
    产生一个二位数:        
    产生1-30的随机数:      
二、字符串函数
1、InStr([Start,]<str1>,<str2>[,Compare])
求str2在字符串str1中最早出现的位置(Start设置开始查找位置,缺省为1;Compare指定比较方法:0为二进制比较,1为不区分大小写,2用于数据库信息比较)。
如:str1=”98765”
  
   S=InStr(str1,str2)             
   S=InStr(3,"aSsiAB","a",1)      
2、Len(<字符串表达式>或<变量名>)
返回字符串所含字符数。
如:Dim str As String*10
  
  
  
   len1=Len(“12345”)            
   len2=Len(12)                   
   len3=Len(i)                    
   len4=Len(“考试中心”)         
   len5=Len(str)                  
3、字符串截取函数
Left(<字符串表达式>,<N>)       
Right(<字符串表达式>,<N>)      
Mid(<字符串表达式>,<N1>,<N2>)      
略,则从N1个起截到底)
如:str1=”opqrst”
  
   Str=Left(str1,3)               
   Str=Left(str2,4)               
   Str=Right(str1,2)              
   Str=Left(str2,2)               
   Str=Mid(str1,4,2)              
   Str=Mid(str2,4)                
4、Space(<数值表达式>)
返回数值表达式值指定的空格字符数。
如: st1r Space(3)               
5、Ucase(<字符串表达式>)         
  Lcase(<字符串表达式>)          ‘大写转换成小写
如: str1 =Ucase(“fHkrYt”)       
Str2 =Lcase(“fHkrYt”)            ‘返回”fhkryt”
6、LTrim(<字符串表达式>)         ‘删除字符串的左边开始空格
RTrim(<字符串表达式>)            ‘删除字符串的右边(尾部)空格
Trim(<字符串表达式>)            

三、日期/时间函数
1、获取系统日期和时间函数
Date()                
Time()                
Now()                 
2、截取日期分量
Year(<表达式>)         
Month(<表达式>)        
Day(<表达式>)          
WeekDay(<表达式>)      
3、截取时间分量
Hour(<表达式>)         
Minute(<表达式>)       
Second(<表达式>)       
4、日期/时间增加或减少一个时间间隔
DateAdd(<间隔类型>,<间隔值>,<表达式>)  
对表达式表示的日期按照间隔参数表示时间间隔减去指定的时间间隔。
如:
D=#2004-2-29 10:40:11#
D1=DateAdd(“yyyy”,3,D) 
D2=DateAdd(“q”,1,D)    
D3=DateAdd(“m”,-2,D)   
D4=DateAdd(“d”,3,D)    
D5=DateAdd(“ww”,2,D)   
D6=DateAdd(“n”,-150,D) 
间隔类型:    
设置       
yyyy       
q          
m          
y          
d          
w          
ww         
h          
n          
s          
5、计算两个日期间隔值函数
DateDiff(<间隔类型>,<日期1>,<日期2>[,W1][,W2])  
返回日期1和日期2之间按照间隔类型的时间间隔数目。
说明:W1为可选项,指定一星期的第一天是星期几的常数,省略为vbSunday即周日返回1;W2可选项,指定一年的第一周的常数,缺省为vbFirstJanl即1月1日的星期为第一周即:
常数              值             
vbFirstJanl         1           
vbFirstFourDays     2           
vbFirstWeek         3           
如:
D1=#2003-5-28 20:8:36#
D2=#2004-2-29 10:40:11#
n1=DateDiff(“yyyy”,D1,D2)      
n2=DateDiff(“q”,D1,D2)         
n3=DateDiff(“m”,D1,D2)         
n4=DateDiff(“ww”,D1,D2)        
n5=DateDiff(“n”,D1,D2)         
6、返回日期指定时间部分函数
DatePart(<间隔类型>,<日期>[,W1][,W2]) 
返回日期中按照间隔类型的指定的时间间隔部分值。
如:
D=#2004-2-29 10:40:11#
n1=DatePart(“yyyy”,D)      
n2=DatePart(“d”,D)         
n3=DatePart(“ww”,D)        
7、返回包含指定年月日的日期函数
DateSerial(表达式1,表达式2,表达式3) 
返回由表达式1为年、表达式2为月、表达式3为日而组成的日期值,但必须是有效的值,如果一个参数超过值,则会进到下一个较大值上。
D= DateSerial(2008,2,29)       
D= DateSerial(2008-1,8-2,0)    
四、类型转换函数
1、字符串转换字符代码函数:Asc(<字符串表达式>)
返回字符串首字母的ASCII的值。
如:s=Asc(“abcdef”)        
2、字符代码转换成字符函数:Chr(<字符代码>)
返回字符代码相关的字符。
如:s=Chr(70)          
s=Chr(13)               返回回车符
3、数字转换成字符串函数:Str(<数值表达式>)
将数值表达式值转换成字符串。
如:s=Str(99)          
s=Str(-6)               返回”-6”
4、字符串转换成数字函数:Val(<字符串表达式>)
将数字字符转换成数值型数字。
如:s=Val(“16”)        
s=Val(“3 45”)          
s=Val(“76af89”)        
5、字符串转换日期函数:DateValue(<字符串表达式>)
将字符传转换成日期值。
如:D= DateValue(“February 29,2004”)              
6、Nz函数:Nz(表达式或字段属性值[,规定值])
当一个表达式或字段属性值为Null时,函数可返回0、零长度字符串(””)或其他指定值。
例如,可使用该函数将Null值转换为其他值。
当省略“规定值”时,如果“表达式或字段属性值”为数值型且值为Null,Nz返回0;反之为字符型且值为Null,Nz返回空字符串(“”).