子窗体求和

张杨 · 发表于 2010-9-7 10:58:52

我在数据库窗体1中建立一个子窗体2，在窗体1下方分别设了文本框[产品编号]和[产品名称]对子窗体查询，输入信息后可以进行查询，请问怎样对子窗体2查询后的数据例如单价一列进行求和而不是所有子窗体2单价的数据。我还在下方建了一个文本框1想让求和数据显示在上面。请教各位高手该怎样做？

ycxchen · 发表于 2010-9-11 09:53:47

HJB016靓女高手一个，很实用的例子，学习了！

hjb016 · 发表于 2010-9-10 17:03:43

呵呵!

张杨 · 发表于 2010-9-10 16:56:48

哇，这回真搞定了，太感谢了你（HJB016）帮了我大忙。

hjb016 · 发表于 2010-9-10 16:21:54

改成这样就可以了.
Text7.Value = Nz(DSum("数量", "CK_入库明细表", "([产品编号] like '*" & Me.文本21 & "*') and ([产品名称] like '*" & Me.文本18 & "*')"))

张杨 · 发表于 2010-9-10 15:54:08

谢谢HIBO16的回复，刚我没仔细看，好像还不行。你那汇总的是整个数据源[数量]一列总和，我要的是查询到哪就汇总到哪？所以还得请教哇？

hjb016 · 发表于 2010-9-10 13:12:18

问题解决了,结贴!

张杨 · 发表于 2010-9-10 13:09:22

谢谢，哇这样的，可以。

hjb016 · 发表于 2010-9-10 09:48:57

这样,你点击查找的时候,就自动求和了.

hjb016 · 发表于 2010-9-10 09:48:22

Dim strSQL As String

If IsNull(Me.文本18) And IsNull(Me.文本21) Then
      MsgBox "请输入要查询的产品编号或产品名称！"
Else
      strSQL = "select * from CK_入库明细表 where ([产品编号] like '*" & Me.文本21 & "*') and ([产品名称] like '*" & Me.文本18 & "*');"
      Me.ZY.Form.RecordSource = strSQL
      Text7.Value = Nz(DSum("数量", "CK_入库明细表", Me.ZY.Form.Filter))
End If

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[窗体] 子窗体求和

群介绍
主题无相 (随机显示版	同地区群块其他地区)