vba 内置函数(VB函数)

一.测试函数

IsNumeric(x) ‘是否为数字, 返回Boolean结果,True or False

IsDate(x) ‘是否是日期, 返回Boolean结果,True or False

IsEmpty(x) ‘是否为Empty, 返回Boolean结果,True or False

IsArray(x) ‘指出变量是否为一个数组。

IsError(expression) ‘指出表达式是否为一个错误值

IsNull(expression) ‘指出表达式是否不包含任何有效数据 (Null)。

IsObject(identifier) ‘指出标识符是否表示对象变量

二.数学函数

Sin(X)、Cos(X)、Tan(X)、Atan(x)  三角函数,单位为弧度
Log(x) 返回x的自然对数
Exp(x)返回  
Abs(x) 返回绝对值
Int(number)、Fix(number) 都返回参数的整数部分,区别:Int 将 -8.4 转换成 -9,而 Fix 将
-8.4 转换成 -8
Sgn(number) 返回一个 Variant (Integer),指出参数的正负号
Sqr(number) 返回一个 Double,指定参数的平方根
VarType(varname) 返回一个 Integer,指出变量的子类型
Rnd(x)返回0-1之间的单精度数据,x为随机种子

三.字符串函数

Len(string)                        计算string长度
Left(string, x)                    取string左段x个字符组成的字符串
Right(string, x)                  取string右段x个字符组成的字符串
Mid(string, start,x)             取string从start位开始的x个字符组成的字符串

 

          

InStr([start],str1, str2,[compare])

  字符串查找函数,返回str1在str2中首次出现的位置索引。若没找到则返回 -1

  参数:

    start: 可选参数,代表从str2 的哪个位置开始查找,不写该参数默认为1,字符串索引从1开始。如果此参数为正,从左到右开始检索,如果此参数为负,从右到左检索。

    str1:源字符串,要在此字符串中查找。

    str2:要在str1中查找的字符串 。

    compare:可选参数,指定字符串比较。可以是 0, 1或 2。 指定0(缺省)做二进制比较。指定1做不区分大小写的文本比较。

  示例:

    pos = InStr("abcabc","b")  在"abcabc"中查找"b",返回2

    pos = InStr(2,"abcabc","ab")  在"abcabc"中,从第2个位置开始查找"ab",返回4

 

 

Replace(原字符串, 目标字符串, 替换后的字符串)    替换字符串

 

Trim(string)                       去掉string左右两端空白
Ltrim(string)                      去掉string左端空白
Rtrim(string)                      去掉string右端空白

 

Ucase(string)                     转换为大写
Lcase(string)                      转换为小写


Space(x)                           返回x个空白的字符串
Asc(string)                         返回一个 integer,代表字符串中首字母的字符代码
Chr(charcode)                     返回 string,其中包含有与指定的字符代码相关的字符

 

 

 

四.转换函数

CBool(expression)                   转换为Boolean型
CByte(expression)                  转换为Byte型
CCur(expression)                    转换为Currency型
CDate(expression)                  转换为Date型
CDbl(expression)                    转换为Double型
CDec(expression)                   转换为Decemal型
CInt(expression)                    转换为Integer型
CLng(expression)                   转换为Long型
CSng(expression)                   转换为Single型
CStr(expression)                    转换为String型
CVar(expression)                    转换为Variant型
Val(string)                             转换为数据型
Str(number)                           转换为String

五.时间函数

Now            返回一个 Variant (Date),根据计算机系统设置的日期和时间来指定日期和时间。
Date           返回包含系统日期的 Variant (Date)。
Time           返回一个指明当前系统时间的 Variant (Date)。
Timer          返回一个 Single,代表从午夜开始到现在经过的秒数。
TimeSerial(hour, minute, second) 返回一个 Variant (Date),包含具有具体时、分、秒的时间。
DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]]) 返回 Variant(Long) 的值,表示两个指定日期间的时间间隔数目
Second(time) 返回一个 Variant (Integer),其值为 0 到 59 之间的整数,表示一分钟之中的某个秒
Minute(time) 返回一个 Variant (Integer),其值为 0 到 59 之间的整数,表示一小时中的某分钟
Hour(time)  返回一个 Variant(Integer),其值为 0 到 23 之间的整数,表示一天之中的某一钟点
Day(date)   返回一个 Variant(Integer),其值为 1 到 31 之间的整数,表示一个月中的某一日
Month(date) 返回一个 Variant(Integer),其值为 1 到 12 之间的整数,表示一年中的某月
Year(date)  返回 Variant (Integer),包含表示年份的整数。
Weekday(date, [firstdayofweek]) 返回一个 Variant (Integer),包含一个整数,代表某个日期是星期几
 
DateAdd("m", 4, date1)  'date1的月份加4,返回该日期
DateAdd("d",-1,date1)    '返回date1的前一天
format(date1,"yyyy-MM-dd")  '将日期date1按照 "yyyy-MM-dd" 格式化为字符串
 
DateSerial(year,month,day)  '返回包含指定的年、月、日的 Variant (Date)

 

posted @ 2023-03-07 15:35  绮丽梦境  阅读(300)  评论(0编辑  收藏  举报