Access平台开发人员帮助 > 通用函数库 > 按功能 > 域聚合函数封装

函数说明

该函数可以根据条件，从表中找到对应字段的总计。

注意：该函数是对Access自身DSum函数的优化，用法和DSum一样，但速度更快。

函数原型

Public Function gf_DSum(strFldName As String, strTblName As String, Optional strFilter As String = " True ", Optional blnCodeProject As Boolean = False) As Variant

语法

gf_DSum(strFldName,strTblName[,strFilter][,blnCodeProject])

参考：gf_DSum("FAge","tblTest","FID=5") '计算表tblTest，条件为FID=5，FAge的和

参数

参数名	必需/可选	数据类型	参数说明
strFldName	必需	String	要查找的字段名
strTblName	必需	String	要查找的表名
strFilter	可选	String	条件（可不写，如果条件字段是文本型要加单引号）
blnCodeProject	可选	Boolean	是否为当前数据库，默认为False。这个涉及到数据库之间的引用，默认即可

返回值

返回查找到的总计。若找不到记录，则返回null。

示例

Sub subTest()

Dim intValue As Integer ’定义一个字符串型变量，保存结果

'求FID的和，条件为 FName=‘Tom’ 。因为FName是文本型，条件的值要加单引号

intValue = Nz(gf_DSum("FID","tblTest","FName=‘Tom’"),0)

Msgbox "FName =Tom , FID的和为 " & intValue '弹窗显示结果

End Sub

求和函数（gf_DSum函数）

求和函数（gf_DSum函数）