1、Access 数据库 VBA 常用标准函数 一、算术函数 1.绝对值函数： Abs（ ） 返回数值表达式的绝对值。如 Abs（ -3） =3 2.向下取整函数： Int（ ） 返回数值表达式的向下取整数的结果，参数为负值时返回小于等于参数值的第一负数。 3.取整函数： Fix（ ） 返回数位表达式的整数部分，参数为负值时返回大于等于参数值的第一负数。 例如： Int（ 3.25） =3， Fix（ 3.25） =3 但 Int（ -3.25） = -4， Fix（ -3.25） = -3 4.四舍五入函数： Round（ ， ） 按照指定的小数位数进入四舍五入运算的结果。 是进入四舍五入运算小
2、数点右边应保留的位数。 例如： Round（ 3.255， 1） = 3.3； Round（ 3. 754， 2） = 3.75； Round（ 3.754， 0） = 4 5.开平方函数： Sqr（ ） 计算数值表达式的平方根。例如： Sqr（ 9） = 3 6.产生随机数函数： Rnd（ ） 产生一个 0-1 之间的随机数，为单精度类型。 例如： Int（ 100 * Rnd） 产生 0， 99的随机整数 Int（ 101 * Rnd） 产生 0,100的随机整数 7.求平均值函数 Avg（） 例如： 在 tstud 表中 求小于所有学生年龄的平均值的学生 ， ， Compare） 检索子
3、字符申 Str2 在字 符串 Strl 中最早出现的位置，返回一整型数。 Start 为可选参数，为数值式，设置检索的起始位置。如省略，从第一个字符开始检索；注意，如果 Strl 的申长度为零，或 Str2 表示的申检索不到，则 InStr 返回 0；如果 Str2 的串长度为零， InStr 返回 Start 的值。 例如： strl =“98765” str2 =“65” s = InStr（ strl ,str2） 返回 4 s = InStr（ 3， “aSsiAB”， “A”， 1） 返回 5。从字符 s 开始，检索出字符 A 2.字符申长度检测函数： Len（ 或 ） 返回字符串所
4、含字符数。注意，定长字符，其长度是定义时的长度，和字符串实际值无关。 例如： lenl = Len（ “12345”） 返回 5 len4 = Len（ “考试中心 ”） 返回 4 3.字符串截取函数 Left （ ， ）：字符串左边起截取 N 个字符。 Right（ ， ）：字符串右边起截取 N 个字符。 Mid（ ， ， N2）：从字符申左边第 N1 个字符起截取 N2 个字符。 例如： strl =“opqrst” str2 =“计算机 等级考试 ” str = Left（ strl， 3） 返回 “opq” str = Left（ str2， 4） 返回 “计算机等 ” str = R
5、ight（ strl， 2） 返回 “st” str = Right（ str2， 2） 返回 “考试 ” str = Mid（ strl， 4， 2） 返回 “rs” str = Mid（ str2， 1， 3） 返回 “计算机 ” str = Mid（ str2， 4，） 返回 “等级考试 ” 4.生成空格字符函数： Space（ ） 返回数值表达式的值指定的空格字符数。 例如： strl = Space(3） 返回 3 个空格字符 5.大小写转换函数 Ucase（ ）：将字符串中小写字母转换成大写字母。 Lcase（ ） :将字符串中大写字母转换成小写字毋。 例如： strl = Uca
6、se（ “fHkrYt”） 返回 “FHKRYT” str2 = Lcase（ “fHKrYt”） 返回 “fhkryt” 6.删除空格函数 Ltrim（ ）：删除字符串的开始空格。 Rtrim（ ）：删除字符串的尾部空格。 Trim（ ）：删除字符串的开始和尾部空格。 例如： str = “ab cde” str1 = Ltrim（ str） 返回 “ab cde” str2 = Rtrim（ str） 返回 “ab cde” str3 = Trim（ str） 返回 “ab cde” 三、日期 /时间函数 日期 /时间函数的功能是处理日期和时间。主要包括以下函数： 1.获取系统日期和时间函
7、数 Date（）：返回当前系统日期。 Time（ ）：返回当前系统时间。 Now（）：返回当前系统日期和时间。 例如： D = Date（） 返回系统气气，如 2008-08-08 T = Time（） 返回系统时间，如 9： 45： 00 DT = Now（） 返回系统日期和时间，如 2008-08-08 9： 45： 00 2.截取日期分量函数 Year（ ）： 返回日期表达式年份的整数。 Month（ ）：返回日期表达式月 份的整数。 Day（ ）：返回日期表达式日期的整数。 Weekday （ .W）：返回 1-7 的整数，表示星期几。 Weekday 函数中，返回的星期值 为星期日为
8、 1，星期一为 2，以此类推。 3.截取时间分量函数 Hour（ ）：返回时间表达式的小时数（ 0-23）。 Minute（ ）：返回时间表达式的分钟数（ 0-58） Second（ ）：返回时间表达式的秒数（ 0-59）。 例如： T = #10： 40： 11# HH = Hours（ T） 返回 10 MM = Minute（ T） 返回 40 SS = Second（ T） 返回 11 4.返回日期函数 DateSerial(year, month, day) D=dateserial(2008,2,29) 返回 #2008-2-29# D=dateserial(2008-1,8-2,
9、0) 返回 #2007-5-31# 当前年的 5 月 1 日 Dateserial(year(date(),5,1) 前一年的 5 月 1 日 Dateserial(year(date()-1,5,1) 后 一年的 5 月 1 日 Dateserial(year(date()+1,5,1) 5 按指定形式返回日期 .format（） Format（ #2010-1-1#， yyyy） 返回 2010 6.计算两个指定日期间的间隔数 .DateDiff（） 5 返回一个包含已知日期的指定时间部分 .DatePart（） 四、类型转换函数 1.字符串转换字符代码函数： Asc（ ） 返回字符申首字
10、符的 ASCII值。例如： s = Asc（ abcdef），返回 97 2.字符代码转换字符函数： Chr（ ） 返回与字符代码相关的字符。例如： s = Chr（ 70），返回 f； s = Chr（ 13），返回回车符 3.数字转换成字符串函数： Str（ ） 将数值表达式值转换成字符串。注意，当一数字转成字符串时，总会在前头保留一空格来表示正负。表达式值为正，返回的字符串包含一前导空格表示有一正好。 例如： s = Str（ 99） 返回 “99”，有一前导空格 s = Str（ -6） 返回 “-6” 4.字符串转换成数字函数： Val（ ） 将数字字符串转换成数值型数字。注意，数字
11、串转换时可自动将字符串中的空格、制表符和换行符去掉，当遇到它不能识别为数字的第一个字符时，停止读入字符串。 例如： s = Val（） 返回 16 s = Val（） 返回 345 s = Val（） 返回 76 五、输入输出函数 1.输出函数 MsgBox() 消息框 MsgBox(消息 , 命令个 数及形式 , 标题文字 , 帮助文件 , 帮助文件号 ) 上面的参数除 “消息 ”是必须的，其它都是可选的。默认的 “命令个数及形式 ”是 “确定 ”按钮。当中间若干个参数不写时，“， ”不可缺少。上面例子值指定了 “消息 ”和 “标题文字 ”两个参数。 2. 输入函数 InputBox（） 输入框 提示信息是必选项
