请教Access窗体中计算指定列数值总和

clon

我的Form是依据一个Query生成的，Form中的数据项目会根据用户使用access自带的筛选功能而变化，我想在Form中加入一个textbox，让用户单击它时，它的内容显示为Form中指定列的数值总和。
在定义textbox控件来源的时候使用“=Sum([Amount])”定义可以在用户打开Form或者筛选之后自动显示数值。但由于性能上的因素，我想将自动功能变成单击事件，把这个功能放入事件代码中。但Sum函数似乎不能使用或者我使用方式不正确，提示“子过程或函数未定义”。
希望高手能给与菜鸟一定的指导。

andymark

写到textbox的单击事件

textbox=Sum([Amount])

clon

以下是引用clon在2006-8-22 10:09:00的发言：
我的Form是依据一个Query生成的，Form中的数据项目会根据用户使用access自带的筛选功能而变化，我想在Form中加入一个textbox，让用户单击它时，它的内容显示为Form中指定列的数值总和。
在定义textbox控件来源的时候使用“=Sum([Amount])”定义可以在用户打开Form或者筛选之后自动显示数值。但由于性能上的因素，我想将自动功能变成单击事件，把这个功能放入事件代码中。但Sum函数似乎不能使用或者我使用方式不正确，提示“子过程或函数未定义”。
希望高手能给与菜鸟一定的指导。

谢谢你的回复，我就是那么写的，但系统报错。似乎Sum只能用在RecordSet上？

clon

Sum()不是VBA中的函数？那在Access VBA中该如何实现我的目的呢？

一点通

用Dsum()试下

clon

以下是引用一点通在2006-8-22 11:35:00的发言：
用Dsum()试下

我之前试过这个函数，不过DSum(expr, domain[, criteria])参数中的domain要求是表或者查询，而我的窗体中需要计算用户执行筛选后所得到数据的总和，每次筛选后都是变化的，所以我不清楚这样的功能是否可以通过VBA代码来实现了。

多谢你的指导！

clon

以下是引用clon在2006-8-22 11:49:00的发言：





我之前试过这个函数，不过DSum(expr, domain[, criteria])参数中的domain要求是表或者查询，而我的窗体中需要计算用户执行筛选后所得到数据的总和，每次筛选后都是变化的，所以我不清楚这样的功能是否可以通过VBA代码来实现了。

多谢你的指导！

如果这个函数可以使用窗体的数据源作为参数就好了

一点通

可以制作成主.子窗体的方式,在子窗体的页脚文本框中用sum计算合计值,在主窗体的文本框引用,可以传你的示例上来看一下

[此贴子已经被作者于2006-8-22 11:59:48编辑过]

clon

以下是引用一点通在2006-8-22 11:59:00的发言：


可以制作成主.子窗体的方式,在子窗体的页脚文本框中用sum计算合计值,在主窗体的文本框引用,可以传你的示例上来看一下

access通过ODBC连着oracle，所以代码发上来也没什么作用，呵呵。

多谢斑竹！

clon

多谢斑竹和管理员同志！