ACCESS数据库VBA常用标准函数

合集下载

Access常用函数举例

Access常用函数举例

常用函数举例常用函数举例1. 转换所谓转换就是从一种格式转换为另一种格式,比如数字转换成字符串,字符串转换成数字等。

在Access 2007的帮助中该类函数共有16个,这里只介绍一些常用的函数,其它函数的使用方法请查看联机帮助文档。

l 数字转字符串函数Str(数字)Str()函数是将一个数值转换成字符串,例:Str(9999.863),其结果是“ 9999.863”,Str(-9999.863),其结果是“-9999.863”如果含有字母,系统将出现错误。

当一数字转成字符串时,总会在前头保留一空位来表示正负。

如果“数字”为正,返回的字符串包含一前导空格暗示有一正号。

可以使用 Format 函数可将数值转成必要的格式,如日期、时间、货币或其他用户自定义格式。

与 Str 不同的是,Format 函数不包含前导空格来放置“数字”的正负号。

注意:Str 函数只视句点 (.) 为有效的小数点。

如果使用不同的小数点(例如,国际性的应用程序),可使用 CStr 将数字转成字符串。

l 字符串转数字函数Val(字符串)Val函数是将一个数值型字符串转换成数值,例:Va l(“9999.863”),其结果是9999.863,Val 函数,在它不能识别为数字的第一个字符上,停止读入字符串。

那些被认为是数值的一部分的符号和字符,例如美圆号与逗号,都不能被识别。

但是函数可以识别进位制符号 &O(八进制)和 &H(十六进制)。

空白、制表符和换行符都从参数中被去掉。

下面的例子返回值为 1615198:Val(" 1615 198th Street N.E.")在下面的代码中,Val 为所示的十六进制数值返回十进制数值 -1。

Val("&HFFFF")如果字符串的首位是字母,其结果为0。

l 空值处理函数Nz(表达式)空值处理函数Nz是专门用来处理表达式空值的,如果该表达式是值为Null 时,可以使用 Nz 函数返回零、零长度字符串(零长度字符串:不含字符的字符串。

Access数据库VBA常用标准函数

Access数据库VBA常用标准函数

Access数据库VBA常用标准函数一、算术函数1.绝对值函数:Abs(<表达式>)返回数值表达式的绝对值。

如Abs(-3)=32.向下取整函数:Int(<数值表达式>)返回数值表达式的向下取整数的结果,参数为负值时返回小于等于参数值的第一负数。

3.取整函数:Fix(<数值表达式>)返回数位表达式的整数部分,参数为负值时返回大于等于参数值的第一负数。

例如:Int(3.25)=3,Fix(3.25)=3但Int(-3.25)= -4,Fix(-3.25)= -34.四舍五入函数:Round(<数值表达式>[,<表达式>])按照指定的小数位数进入四舍五入运算的结果。

[<表达式>]是进入四舍五入运算小数点右边应保留的位数。

例如:Round(3.255,1)= 3.3;Round(3. 754,2)= 3.75;Round(3.754,0)= 45.开平方函数:Sqr(<数值表达式>)计算数值表达式的平方根。

例如:Sqr(9)= 36.产生随机数函数:Rnd(<数值表达式>)产生一个0-1之间的随机数,为单精度类型。

例如:Int(100 * Rnd)’产生[0,99]的随机整数Int(101 * Rnd)’产生[0,100]的随机整数7..求平均值函数Avg()例如:在tstud表中求小于所有学生年龄的平均值的学生<(select avg([年龄]) from tstud)8.. 求和函数sum()二、字符串函数1.字符串检索函数:InStr([Start,] <Strl>,<Stf2> [,Compare])检索子字符申Str2在字符串Strl中最早出现的位置,返回一整型数。

Start为可选参数,为数值式,设置检索的起始位置。

如省略,从第一个字符开始检索;注意,如果Strl的申长度为零,或Str2表示的申检索不到,则InStr返回0;如果Str2的串长度为零,InStr返回Start的值。

ACCESS常用函数

ACCESS常用函数

ACCESS常用函数ACCESS是一款广泛使用的数据库软件,其拥有众多的函数,可帮助用户完成各种数据库操作。

以下是ACCESS常用函数中文解释:一、数值函数1.ABS函数:返回指定数值的绝对值。

2.CEILING函数:返回大于或等于指定数值的最小整数。

3.EXP函数:返回自然对数的指定指数幂。

6.LOG10函数:返回指定数的以10为底的对数。

9.RANDOM函数:返回随机数。

10.ROUND函数:返回四舍五入后的整数或指定小数位数的数值。

11.SIGN函数:返回一个数的符号。

二、字符串函数1.LEFT函数:返回字符串的左侧字符。

3.LOWER函数:返回由指定字符串转换成小写字母的新字符串。

4.MID函数:返回从指定字符串的第一个字符开始的指定字符数量的字符串。

5.REPLACE函数:将在指定字符串中出现的一个子字符串替换为另一个字符串。

三、日期函数1.DATE函数:返回由年、月和日组成的日期值。

3.MONTH函数:返回指定日期的月份。

4.NOW函数:返回当前日期和时间。

5.SECOND函数:返回指定时间的秒数。

7.WEEKDAY函数:返回指定日期的星期几。

四、逻辑函数1.AND函数:返回两个或多个逻辑表达式的逻辑与运算结果。

2.IF函数:根据条件返回不同的值。

6.TRUE函数:返回逻辑真值。

五、其他函数1.COUNT函数:返回指定列(或其他表达式)中非空值的数量。

2.DLOOKUP函数:返回符合查询条件的一条记录中的一个单元格的值。

3.FIRST函数:返回满足查询条件的第一条记录中指定列的值。

4.ISNULL函数:返回一个值是否为空的布尔值。

函数:如果表达式为空,则返回指定替代值。

7.VAL函数:返回一个字符串表达式的数值。

access基本函数大全【经典】

access基本函数大全【经典】
返回包含指定年月日的日期
DateDiff(<间隔类型>,<日期1>,<日期2>[,W1][,W2])
返回日期1和日期2之间按照间隔类型所指定的时间间隔数目
DatePart(<表达式1>,<表达式2>,<表达式3>)
返回由表达式1值为年、表达式2值为月、表达式3值为日而组成的
转换函数
字符串转换字符代码
按照指定的小数位数进行四舍五入运算的结果。[<表达式>]是进行四舍五入运算小数点右边保留的位数
平方根
Srq(<数值表达式>)
返回数值表达式的平方根值
符号
Sgn(<数值表达式>)
返回数值表达式值的符号值。当数值表达式值大于0,返回值为1;当数值表达式值等于0,返回值为0;当数值表达式值小于0,返回值为-1
Minute(<时间表达式>)
返回时间表达式的分钟数(0~59)
Second(<时间表达式>)
返回时间表达式的秒数(0~59)
获取系统日期和系统时间
Date()
返回当前系统日期
Time()
返回当前系统时间
Now()
返回当前系统日期和时间
时间间隔
DateAdd(<间隔类型>,<间隔值>,<表达式>)
对表达式表示的日期按照间隔类型加上或减去指定的时间间隔值
返回由数值表达式的值确定的空格个数组成的空字符串
字符重复
String(<数值表达式>,<字符表达式))
返回一个由字符表达式的第1个字符重复组成的指定长度为数值表达式值的字符串

Access函数大全

Access函数大全

Access 函数大全1/49 陈树青Abs 函数返回参数的绝对值,其类型和参数相同。

语法Abs (number )必要的number 参数是任何有效的数值表达式,如果number 包含包含 Null Null Null,则返回,则返回Null ,如果number 是未初始化的变量,则返回的变量,则返回 0 0 0。

说明一个数的绝对值是将正负号去掉以后的值。

例如,一个数的绝对值是将正负号去掉以后的值。

例如,ABS(-1) ABS(-1) ABS(-1) 和和 ABS(1) ABS(1) 都返回都返回都返回 1 1 1。

Array 函数返回一个包含数组的返回一个包含数组的 Variant Variant Variant。

语法Array(arglist )所需的arglist 参数是一个用逗号隔开的值表,这些值用于给Variant 所包含的数组的各元素赋值。

如果不提供参数,则创建一个长度为参数,则创建一个长度为 0 0 0 的数组。

的数组。

说明用来表示数组元素的符号由变量名、圆括号以及括号中的所需元素的索引号组成。

在下面的示例中,第一条语句创建一个Variant 的变量的变量 A A A。

第二条语句将一个数组赋给变量第二条语句将一个数组赋给变量 A A A。

最后一条语句将该数组的第二个元素的值赋给另一个变量。

Dim A As Variant A = Array(10,20,30) B = A(2)使用Array 函数创建的数组的下界受Option Base 语句指定的下界的决定语句指定的下界的决定, , , 除非除非Array 是由类型库(例如VBA.Array )名称限定。

如果是由类型库名称限定,则Array 不受Option Base 的影响。

注意没有作为数组声明的Variant 也可以表示数组。

除了长度固定的字符串以及用户定义类型之外,Variant 变量可以表示任何类型的数组。

尽管一个包含数组的Variant 和一个元素为Variant 类型的数组在概念上有所不同,但对数组元素的访问方式是相同的。

ACCESS基本函数大全【经典免费】

ACCESS基本函数大全【经典免费】
Minute(<时间表达式>)
返回时间表达式的分钟数(0~59)
Second(<时间表达式>)
返回时间表达式的秒数(0~59)
获取系统日期和系统时间
Date()
返回当前系统日期
Time()
返回当前系统时间
Now()
返回当前系统日期和时间
时间间隔
DateAdd(<间隔类型>,<间隔值>,<表达式>)
对表达式表示的日期按照间隔类型加上或减去指定的时间间隔值
大小写转换
Ucase(<字符表达式>)
将字符表达式中小写字母转换成大写字母
Lcase(<字符表达式>)
将字符表达式中大写字母转换成小写字母
S
Q
L




总计
Sum(<字符表达式>)
返回字符表达式中的总和。字符表达式可以是一个字段名,也可以是一个含字段名的表达式,但所含字段应该是数字数据类型的字段
平均值
Right(<字符表达式>,<数值表达式>)
返回一个值,该值是从字符表达式右侧第1个字符开始,截取的若干个字符。其中,字符个数是数值表达式的值。当字符表达式是Null时,返回Null值;当数值表达式值为0时,返回一个空串;当数值表达式大于或等于字符表达式的字符个数时,返回字符表达式
Mid(<字符表达式>,<数值表达式1>[,<数值表达式2>])
随机数
Rnd(<数值表达式>)
产生一个0到9之间的随机数,为单精度类型。如果数值表达式值小于0,每次产生相同的随机数;如果数值表达式值大于0,每次产生新的随机数;如果数值表达式等于0,产生最近生成的随机数,且生成的随机数序列相同;如果省略数值表达式参数,则默认参数值大于0

ACCESS函数大全

ACCESS函数大全

ACCESS高级操作一.Access函数大全1.1日期/时间CDate 将字符串转化成为日期 select CDate("2005/4/5")Date 返回当前日期DateAdd 将指定日期加上某个日期select dateAdd("d",30,Date())将当前日期加上30天,其中d可以换为yyyy或H等DateDiff 判断两个日期之间的间隔 select DateDiff("d","2006-5-1","2006-6-1")返回31,其中d可以换为yyyy,m,H等DatePart 返回日期的某个部分 select DatePart("d","2006-5-1")返回1,即1号,d也可以换为yyyy(年)或q(季),m(月),d(日),w(工作日),ww(周),h(时),n(分),s(秒)Day 返回日期的d部分,等同于datepart的d部分Dateserial(年,月,日) 组合年月日构造日期Hour 返回日期的小时IsDate 判断是否是日期,是日期返回-1,不是日期返回0Minute 返回日期的分钟部分Month 返回日期的月份部分Now 返回当前时间(完整时间,包括年月日小时分秒)Second 返回日期的秒部分Time 返回当前的时间部分(即除去年/月/日的部分)Weekday 返回某个日期的当前星期(星期天为1,星期一为2,星期二为3...),例如select weekday(now());Year 返回某个日期的年份1.2检查IsEmpty 检测是否为空(不过经测试,不管什么情况,都返回0)IsNull 检测是否为Null值,null值返回0,非null值返回-1IsNumeric 检测是否为数字,是数字返回-1,否则返回01.3算术Abs 绝对值Atn 返正切值。

Access vba 常用代码函数整理

Access vba 常用代码函数整理

制作 : 二痞子
1.------- 在一个窗体中刷新另一个窗体中的控件代码 2. ------- Isnull 判断空值 3. ------- Docmd 方法 4. ------- RunSQL 方法 5. ------- Dlookup 方法 6. ------- SourceObject 属性 7. ------- Parent 特性 8. ------- SelectRecord() '整行选中记录函数-------模块 9. ------- Dcount 判断一个字段值是否存在 10. -------Shell 函数 11. -------“MouseMove”产生了如下错误-------模块 12. ------- AutoNumStr 自动编号函数 不支持断号重续 -------模块 13. ------- AutoNum 自动编号函数(支持文本和数字类型、支持断号重续)-------模块
On Error GoTo ErrorHandler
Dim strPrefixal As String
Dim strTemp As String
strPrefixal = Prefixal If DateFormat <> "" Then strPrefixal = strPrefixal & Format(Date, DateFormat) If strPrefixal <> "" Then strTemp = "[" & FieldName & "] Like '" & strPrefixal & "*'" strTemp = Nz(DMax(FieldName, TableName, strTemp), "0") strTemp = Val(Mid(strTemp, Len(strPrefixal) + 1)) + 1 strTemp = Format(strTemp, String(Digit, "0")) AutoNumStr = strPrefixal & strTemp

VBA中操作Access数据库的常用方法

VBA中操作Access数据库的常用方法

VBA中操作Access数据库的常用方法VBA (Visual Basic for Applications) 是一种用于自动化各种应用程序的编程语言,它可以与Microsoft Office中的各种应用程序进行交互,包括Access数据库。

在本文中,我们将讨论在VBA中操作Access数据库时常用的方法,希望可以帮助您更好地利用这些方法来处理和管理数据库。

1. 连接到Access数据库连接到Access数据库是进行任何数据库操作的第一步。

我们可以使用ADO (ActiveX Data Objects) 对象来建立与数据库的连接。

下面是一个连接到Access数据库的例子:```vbaDim conn As ADODB.ConnectionSet conn = New ADODB.Connectionconn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\path\to\database.accdb;"conn.Open```这段代码创建了一个ADODB.Connection对象,并设置其ConnectionString属性来指定数据库连接字符串,然后通过Open方法打开数据库连接。

2. 执行SQL查询执行SQL查询是从Access数据库中获取数据的常用方法。

可以使用ADODB.Recordset对象来执行查询并获取结果。

以下是一个例子:```vbaDim rs As New ADODB.RecordsetDim strSQL As StringstrSQL = "SELECT * FROM TableName"rs.Open strSQL, conn' 遍历结果Do Until rs.EOF' 处理每一行数据rs.MoveNextLooprs.Close```在这个例子中,我们创建了一个ADODB.Recordset对象,并使用Open方法执行了一个SELECT语句,并将返回的结果集存储在Recordset对象中。

ACCESS基本函数大全【经典免费】

ACCESS基本函数大全【经典免费】
返回一个值,该值是检索子字符串在字符串中最早出现的位置。其中,数值表达式为可选项,是检索的起始位置,若省略,从第一个字符开始检索。比较方法为可选项,指定字符串比较方法。值可以为1、2或0,值为0(缺省)做二进制比较,值为1做不区分大小写的文本比较,值为2做基于数据库中包含信息的比较。若指定比较方法,则必须指定数据表达式值
消息函数
利用提示框输入
InputBox(提示[,标题][,默认])
在对话框中显示提示信息,等待用户输入正文并按下按钮,并返回文本框中输入的内容(string型)
提示框
Msgbox(提示[,按钮、图标和默认按钮][,标题])
在对话框中显示信息,等待用户单击按钮,并返回一个Integer型数值,告诉用户单击的是哪一个按钮
Asc(<字符表达式>)
返回字符表达式首字符的ASCII值
字符代码转换字符
Chr(<字符代码>)
返回与字符代码对应的字符
数字转换成字符串
Str(<数值表达式>)
将数值表达式转换成字符串
字符转换成数字
Val(字符表达式)
将数值字符串转换成数值型数字
Nz(<表达式>)[,规定值]
如果表达式为null,Nz函数返回0;对零长度的空串可以自定义一个返回值(规定值)
按照指定的小数位数进行四舍五入运算的结果。[<表达式>]是进行四舍五入运算小数点右边保留的位数
平方根
Srq(<数值表达式>)
返回数值表达式的平方根值
符号
Sgn(<数值表达式>)
返回数值表达式值的符号值。当数值表达式值大于0,返回值为1;当数值表达式值等于0,返回值为0;当数值表达式值小于0,返回值为-1

(完整版)ACCESS基本函数大全【经典免费】,推荐文档

(完整版)ACCESS基本函数大全【经典免费】,推荐文档
ACCESS 基本函数大全
类 函数名

函数格式
绝对值
Abs(<数值表达式>)
In数值表达式>)
Round(<数值表达式> [,<表达式>])
平方根
Srq(<数值表达式>)

符号
Sgn(<数值表达式>)



随机数
Rnd(<数值表达式>)
正弦函数 余弦函数 正切函数 自然指数 自然对数
Sin(<数值表达式>) Cos(<数值表达式>) Tan(<数值表达式>) Exp(<数值表达式>) Log(<数值表达式>)
生成空格字符 Space(<数值表达式>)
字符重复
String(<数值表达式>,< 字符表达式))
Left(<字符表达式>,<数 值表达式>)
Right(<字符表达式>,< 字符串截取 数值表达式>)
说明
返回数值表达式的绝对值 返回数值表达式的整数部分值,参考为负值时 返回大于等于参数值的第一个负数 返回数值表达式的整数部分值,参考为负值时 返回小于等于参数值的第一个负数 按照指定的小数位数进行四舍五入运算的结果。 [<表达式>]是进行四舍五入运算小数点右边保留 的位数 返回数值表达式的平方根值 返回数值表达式值的符号值。当数值表达式值 大于 0,返回值为 1;当数值表达式值等于 0,返 回值为 0;当数值表达式值小于 0,返回值为-1 产生一个 0 到 9 之间的随机数,为单精度类型。 如果数值表达式值小于 0,每次产生相同的随机 数;如果数值表达式值大于 0,每次产生新的随 机数;如果数值表达式等于 0,产生最近生成的 随机数,且生成的随机数序列相同;如果省略 数值表达式参数,则默认参数值大于 0 返回数值表达式的正弦值 返回数值表达式的余弦值 返回数值表达式的正切值 计算 e 的 N 次方,返回一个双精度 计算以 e 为底的数值表达式的值的对数 返回由数值表达式的值确定的空格个数组成的 空字符串 返回一个由字符表达式的第 1 个字符重复组成 的指定长度为数值表达式值的字符串 返回一个值,该值是从字符表达式左侧第 1 个 字符开始,截取的若干字符。其中,字符个数 是数值表达式的值。当字符表达式是 null 时, 返回 null 值;当数值表达式值为 0 时,返回一 个空串;当数值表达式值大于或等于字符表达 式的字符个数时,返回字符表达式 返回一个值,该值是从字符表达式右侧第 1 个 字符开始,截取的若干个字符。其中,字符个 数是数值表达式的值。当字符表达式是 Null 时, 返回 Null 值;当数值表达式值为 0 时,返回一 个空串;当数值表达式大于或等于字符表达式

access数据类型在vba的表达方法

access数据类型在vba的表达方法

在VBA(Visual Basic for Applications)中,Access数据类型可以通过使用不同的
变量类型来表示。

Access数据库中常见的数据类型包括文本、数字、日期/时间等。

以下是一些常见的Access数据类型及其在VBA中的表达方法:
1.文本型(Text):
在VBA中,使用String类型表示文本型。

例如:
2.数字型(Number):
数字型在VBA中可以使用Integer(整数), Long(长整数), Single(单精度
浮点数), Double(双精度浮点数)等数据类型表示。

例如:
3.日期/时间型(Date/Time):
使用Date类型表示日期/时间型。

例如:
4.Yes/No 型(Yes/No):
在VBA中,可以使用Boolean类型表示Yes/No型。

例如:
5.自动编号型(AutoNumber):
通常,自动编号是Access数据库表的主键,而在VBA中,可以使用Long
或Integer类型表示。

例如:
6.货币型(Currency):
使用Currency类型表示货币型。

例如:
7.超大文本型(Memo):
超大文本型可以使用String类型表示。

例如:
这只是一些基本的数据类型示例,实际上还有其他数据类型,取决于Access数据库中字段的具体定义。

在使用VBA时,要根据数据库中字段的数据类型选择适当的VBA数据类型。

此外,通过使用Recordset对象,你可以访问和处理Access数据库中的数据。

accessVBA函数集

accessVBA函数集

▲Sql合计函数
Avg 取字段平均值
Count 统计记录条数
Max 取字段最大值
Min 取字段最小值
StDev 估算样本的标准差(忽略样本中的逻辑值和文本)。
StDevP 计算以参数形式(忽略逻辑值和文本)给出的整个样本总体的标准偏差。
Sum 计算字段的总合
Var 估算样本方差(忽略样本中的逻辑值和文本)。
DatePart 返回日期的某个部分 select DatePart("d","2006-5-1")返回1,即1号,d也可以换为yyyy或m
Day 返回日期的d部分,等同于datepart的d部分
Hour 返回日期的小时
IsDate 判断是否是日期,是日期返回-1,不是日期返回0
Minute 返回日期的分钟部分
VarP 计算整个样本总体的方差(忽略样本总体中的逻辑值和文本)。
▲文本
Asc 返回字母的Acsii值,select Asc("A")返回65
Chr 将ascii值转换到字符 select chr(65)返回"A"
Format 格式化字符串,Select Format(now(),'yyyy-mm-dd')返回类似于"2005-04-03" ,Select Format(3/9,"0.00")返回0.33
Cos 余弦值
Exp 返回 e 的给定次幂。
Fix 返回数字的整数部分(即小数部分完全截掉)
Int 将数字向下取整到最接近的整数。到1之间的随机数值
Sgn 返回数字的正负符号(正数返回1,负数返回-1,0值返回0)

Access_VBA_手册

Access_VBA_手册
序号
标题
1 将日期转换成中文显示的函数
内Fu容nction Date2Chin ese(iDate)
Dim num(10)
Dim iYear
Dim iMonth
Dim iDay
num(0) = " 〇"
num(1) = " 一"
num(2) = " 二"
num(3) = " 三"
num(4) = " 四"
16 打开外部数据库中的报表
实现打开 外部数据 库中的报 表。 Private Declare Function apiSetFor egroundW indow Lib "user32" _
Alias "SetForeg roundWin dow" _
(ByVal hwnd As Long) _
num(5) = " 五"
num(6) = " 六"
2 取消Access主窗体中的“关闭”按钮
Private Declare Function DeleteMe nu Lib "User32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long
10 用代码选择图表样式
用代码选 择图表样 式 "柱形图"
Me.graph now.Obje ct.ChartTy pe = xlColumn Clustered "折线图" Me.graph now.Obje ct.ChartTy pe = xlLineMar kers "饼形图" Me.graph now.Obje ct.ChartTy pe = xl3DPie "条形图" Me.graph now.Obje ct.ChartTy pe = xlBarClust ered

实用文档之ACCESS基本函数大全【经典免费】

实用文档之ACCESS基本函数大全【经典免费】
返回包含指定年月日的日期
DateDiff(<间隔类型>,<日期1>,<日期2>[,W1][,W2])
返回日期1和日期2之间按照间隔类型所指定的时间间隔数目
DatePart(<表达式1>,<表达式2>,<表达式3>)
返回由表达式1值为年、表达式2值为月、表达式3值为日而组成的
转换函数
字符串转换字符代码
返回一个值,该值是从字符表达式最左端某个字符开始,截取到某个字符为止的若干个字符。其中,数值表达式1的值是开始的字符位置,数值表达式2是终止的字符位置。数值表达式2可以省略,若省略了数值表达式2,则返回的值是:从字符表达式最左端某个字符开始,截取到最后一个字符为止的若干个字符
字符串长度
Len(<字符表达式>)
Round(<数值表达式>[,<表达式>])
按照指定的小数位数进行四舍五入运算的结果。[<表达式>]是进行四舍五入运算小数点右边保留的位数
平方根
Srq(<数值表达式>)
返回数值表达式的平方根值
符号
Sgn(<数值表达式>)
返回数值表达式值的符号值。当数值表达式值大于0,返回值为1;当数值表达式值等于0,返回值为0;当数值表达式值小于0,返回值为-1
返回一个值,该值是检索子字符串在字符串中最早出现的位置。其中,数值表达式为可选项,是检索的起始位置,若省略,从第一个字符开始检索。比较方法为可选项,指定字符串比较方法。值可以为1、2或0,值为0(缺省)做二进制比较,值为1做不区分大小写的文本比较,值为2做基于数据库中包含信息的比较。若指定比较方法,则必须指定数据表达式值

ACCESS VBA编程必须掌握的聚合函数(判断 表 值)

ACCESS VBA编程必须掌握的聚合函数(判断 表 值)

VBA中的聚合函数及用法——如何判断表中的值?*****常用域聚合函数*****1、DCount(expr, domain, [criteria]):确定特定记录集(一个域)中的记录数。

2、DSum(expr, domain, [criteria]):计算指定记录集(一个域)中的一组值的总和。

3、DAvg(expr, domain, [criteria]):计算指定记录集(一个域)中的一组值的平均值。

4、DMax(expr, domain, [criteria]):计算指定记录集(一个域)中的一组值的最大值。

5、DMin(expr, domain, [criteria]):计算指定记录集(一个域)中的一组值的最小值。

6、DLookup(expr, domain, [criteria]):从指定记录集(一个域)中获取特定字段的值。

参数说明:(1)expr:一个表达式,用于标识需要返回其值的字段。

它既可以是用于标识表或查询中字段的字符串表达式,也可以是以该字段上的数据进行计算的表达式。

在expr 中,可以包括表中字段的名称、窗体上的控件、常量或函数。

如果expr 包含函数,那么它可以是内置的,也可以是用户定义的,但不能是另一个域聚合函数或SQL 聚合函数。

(2)domain:字符串表达式,代表组成域的记录集。

可以是表名称或不需要参数的查询名称。

(3)[criteria]:可选的字符串表达式,用于限制域聚合函数执行的数据范围。

例如,criteria 通常等价于SQL 表达式中的WHERE 子句,只是不含WHERE 关键字。

任何包含在criteria 中的字段必须同时也是domain 中的字段,否则Dlookup 函数将返回Null。

域聚合函数示例1、利用DCount函数统计教师人数: DCount("[教师编号]","教师")2、利用DCount函数统计男教师人数: DCount("[教师编号]","教师","[教师]![性别]='男' ")3、利用DSum函数统计教师总教龄: DSum("year(date())-year([工作时间])","教师")4、利用DAvg函数统计教师平均教龄: DAvg("year(date())-year([工作时间])","教师")5、利用DMax函数统计教师最大教龄: DMax("year(date())-year([工作时间])","教师")6、利用DMin函数统计教师最小教龄: DMin("year(date())-year([工作时间])","教师")7、利用DLookup 获取特定工作时间的教师: =DLookUp("[姓名]","教师","教师![工作时间]=#2000-12-13#")其它常用函数(1)表达式中的函数—数值函数注意区别int 、fix、cint 对数字处理的结果(2)表达式中的函数—字符函数函数符举例说明:1、SPACE(4)=””四个空格2、STRING(4,”abcd”)=”aaaa”3、LEFT(2,”abcd”)=”ab”、RIGHT(2,”abcd”)=”cd”、MID(”abcd”,2,2)=”bc”4、LEN(”abcd”)=4、LEN(””)=0、LEN(null)=null5、LTRIM(“ ab ”)= “ab ”、RTRIM(“ ab ”)= “ ab”、TRIM(“ ab ”)= “ab”6、Chr(65)=A,Chr(97)=a7、Asc("A")=65,Asc("Apple")=658、Str(459)=" 459"在459 前面有一个空格,Str(-459.65)="-459.65"(4)日期时间函数函数符举例说明:1、DAY(#2010-3-9#)=9、MONTH(#2010-3-9#)=3、YEAR(#2010-3-9#)=20102、WEEKDAY(#2010-3-9#)=3,注意,星期天为一周的第一天3、DATE( )= #2010-3-9#4、DateDiff(interval, date1, date2)函数,interval 参数设定值有:yyyy(年)、q(季)、m(月)、y(一年的日数)、d(日)、w(一周的日数)、ww(周)、h(时)、n(分钟)、s(秒)。

第6章 Access的编程语言VBA

第6章 Access的编程语言VBA

Select Case语句——例
Dim Number Number = 8 ' 设置变量初值。 Select Case Number ' 判断 Number 的值。
Case 1 To 5 ' Number 的值在 1 到 5 之间,包含1 和 5 。 Debug.Print "Between 1 and 5" ' 下一个 Case 子句是本示例中唯一判断值为 True 的子句。 Case 6, 7, 8 ' Number 的值在 6 到 8 之间。 Debug.Print "Between 6 and 8" Case 9 To 10 ' Number 的值为 9 或 10。 Debug.Print "Greater than 8" Case Else ' 其他数值。 Debug.Print "Not between 1 and 10"
Do...Loop 语句——例
本示例内层的 Do...Loop 语句循环到第 10 次时将标志值设置为
False,并用 Exit Do 语句强制退出内层循环。外层循环则在检查 到标志值为 False 时,马上退出。
Dim Check, Counter Check = True: Counter = 0 ' 设置变量初始值。 Do ' 外层循环。 Do While Counter < 20 ' 内层循环。 Counter = Counter + 1 ' 计数器加一。 If Counter = 10 Then ' 如果条件成立。 Check = False ' 将标志值设成 False。 Exit Do ' 退出内层循环。 End If Loop Loop Until Check = False ' 退出外层循环。

ACCESS基本函数大全【经典免费】

ACCESS基本函数大全【经典免费】
根据条件表达式的值决定函数的返回值,当条件表达式值为真,函数返回值为表达式1的值,条件表达式值为假,函数返回值为表达式2的值。
开关
Switch(<条件表达式1>,<表达式1>[,<条件表达式2>,<表达式2>…[,<条件表达式n>,<表达式n>]])
计算每个条件表达式,并返回列表中第一个条件表达式为True时与其关联的表达式的值
Right(<字符表达式>,<数值表达式>)
返回一个值,该值是从字符表达式右侧第1个字符开始,截取的若干个字符。其中,字符个数是数值表达式的值。当字符表达式是Null时,返回Null值;当数值表达式值为0时,返回一个空串;当数值表达式大于或等于字符表达式的字符个数时,返回字符表达式
Mid(<字符表达式>,<数值表达式1>[,<数值表达式2>])
ACCESS基本函数大全
类型
函数名
函数格式
说明




绝对值
Abs(<数值表达式>)
返回数值表达式的绝对值
取整
Int(<数值表达式>)
返回数值表达式的整数部分值,参考为负值时返回大于等于参数值的第一个负数
Fix(<数值表达式>)
返回数值表达式的整数部分值,参考为负值时返回小于等于参数值的第一个负数
Round(<数值表达式>[,<表达式>])
返回包含指定年月日的日期
DateDiff(<间隔类型>,<日期1>,<日期2>[,W1][,W2])
返回日期1和日期2之间按照间隔类型所指定的时间间隔数目

access常用函数用法

access常用函数用法

access常用函数用法一、引言在MicrosoftAccess数据库应用中,函数是一种强大的工具,它们提供了各种操作和查询数据的方式。

这些函数使得我们能够更高效地处理数据,创建复杂的查询和报表,以及实现更高级的自动化任务。

本文将介绍一些在Access中常用的函数及其用法。

二、常用函数介绍1.字符串函数(1)Left(string,length):返回字符串左侧length个字符。

(2)Right(string,length):返回字符串右侧length个字符。

(3)Mid(string,start,length):从字符串中提取从start位置开始的length个字符。

(4)Replace(string,old_value,new_value):替换字符串中old_value为new_value。

(5)Length(string):返回字符串的长度(以字符为单位)。

2.数值函数(1)Sum(expression):对一组数值求和。

(2)Count([*],expression):返回expression中非空值的数量。

(3)Avg(expression):返回expression的平均值。

(4)Min(expression):返回expression的最小值。

(5)Max(expression):返回expression的最大值。

3.日期和时间函数(1)Date():返回当前日期。

(2)Time():返回当前时间。

(3)DateAdd(interval,number,date):在date上增加指定的interval和number。

(4)DateSerial(year,month,day):创建一个日期,年、月和日由用户指定。

三、函数使用示例1.使用Left函数提取姓名:假设有一个表"Customers",其中包含"Name"字段,可以使用如下查询获取每个客户的名字:SELECTLeft([Name],10)ASCustomerNameFROMCustomers。

access六个基本对象中实现vba

access六个基本对象中实现vba

access六个基本对象中实现vba在VBA中,可以通过以下方式实现Access六个基本对象的操作:1. 数据库对象(Database Object):可以使用DAO(数据访问对象)库或ADO(ActiveX 数据对象)库来创建一个数据库对象,例如:使用DAO:```Dim dbs As DAO.DatabaseSet dbs = OpenDatabase("C:\myDB.accdb")```使用ADO:```Dim cn As ADODB.ConnectionSet cn = New ADODB.Connectioncn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\myDB.accdb" cn.Open```2. 表对象(Table Object):可以使用DAO或ADO库来创建、修改或删除表格对象,例如:使用DAO:```Dim tdf As DAO.TableDefSet tdf = dbs.CreateTableDef("NewTable")tdf.Fields.Append tdf.CreateField("ID", dbLong)dbs.TableDefs.Append tdf```使用ADO:```cn.Execute "CREATE TABLE NewTable (ID LONG)"```3. 查询对象(Query Object):可以使用DAO或ADO库来创建、修改或查询查询对象,例如:使用DAO:```Dim qdf As DAO.QueryDefSet qdf = dbs.CreateQueryDef("NewQuery", "SELECT * FROM MyTable")```使用ADO:```Set rs = cn.Execute("SELECT * FROM MyTable")```4. 表单对象(Form Object)和报表对象(Report Object):可以使用Access自带的表单设计器或报表设计器来创建、修改或删除表单对象和报表对象。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

检索子字符申Str2在字符串Strl中最早出现的位置,返回一整型数。Start为可选参数,为数值式,设置检索的起始位置。如省略,从第一个字符开始检索;注意,如果Strl的申长度为零,或Str2表示的申检索不到,则InStr返回0;如果Str2的串长度为零,InStr返回Start的值。
例如:strl =“98765” str2 =“65” s = InStr(strl ,str2) ’返回4
t(&lt;数值表达式&gt;)
返回数值表达式的向下取整数的结果,参数为负值时返回小于等于参数值的第一负数。
3.取整函数:Fix(&lt;数值表达式&gt;)
返回数位表达式的整数部分,参数为负值时返回大于等于参数值的第一负数。
例如:Int(3.25)=3,Fix(3.25)=3但Int(-3.25)= -4,Fix(-3.25)= -3
7..求平均值函数Avg()
例如:在tstud表中求小于所有学生年龄的平均值的学生 &lt;(select avg([年龄]) from tstud)
8.. 求和函数sum()
二、字符串函数
1.字符串检索函数:InStr([Start,] &lt;Strl&gt;,&lt;Stf2&gt; [,Compare])
4.四舍五入函数:Round(&lt;数值表达式&gt;[,&lt;表达式&gt;])
按照指定的小数位数进入四舍五入运算的结果。[&lt;表达式&gt;]是进入四舍五入运算小数点右边应保留的位数。 例如:Round(3.255,1)= 3.3; Round(3. 754,2)= 3.75;Round(3.754,0)= 4
5.开平方函数:Sr(&lt;数值表达式&gt;)
计算数值表达式的平方根。例如:Sr(9)= 3
6.产生随机数函数:Rnd(&lt;数值表达式&gt;)
产生一个0-1之间的随机数,为单精度类型。
例如:Int(100 * Rnd) ’产生[0,99]的随机整数 Int(101 * Rnd) ’产生[0,100]的随机整数
3.字符串截取函数
Left (&lt;字符串表达式&gt;,&lt;N&gt;):字符串左边起截取N个字符。
Right(&lt;字符串表达式&gt;,&lt;N&gt;):字符串右边起截取N个字符。
Mid(&lt;字符串表达式&gt;,&lt;N1&gt;,[N2]):从字符申左边第N1个字符起截取N2个字符。
例如:strl =“oprst”
str2 =“计算机等级考试”
str = Left( strl,3) ’返回“op” str = Left( str2,4) ’返回“计算机等”
str = Right( strl,2) ’返回“st” str = Right( str2,2) ’返回“考试”
str = Mid( strl,4,2) ’返回“rs” str = Mid( str2,1,3) ’返回“计算机”
str = Mid(str2, 4,) ’返回“等级考试”
4.生成空格字符函数:Space(&lt;数值表达式&gt;)
返回数值表达式的值指定的空格字符数。
例如:strl = Space(3) ’返回3个空格字符
5.大小写转换函数
Ucase(&lt;字符串表达式&gt;):将字符串中小写字母转换成大写字母。
Lcase(&lt;字符串表达式&gt;):将字符串中大写字母转换成 Nhomakorabea写字毋。
例如:strl = Ucase(“fHkrYt”) ’返回“FHKRYT”
s = InStr( 3,“aSsiAB”,“A”,1) ’返回5。从字符s开始,检索出字符A
2.字符申长度检测函数:Len(&lt;字符申表达式&gt;或&lt;变量名&gt;)
返回字符串所含字符数。注意,定长字符,其长度是定义时的长度,和字符串实际值无关。
例如: lenl = Len(“12345”) ’返回5 len4 = Len(“考试中心”) ’返回4
相关文档
最新文档