Office中国论坛/Access中国论坛

标题: 求助：点击按钮，打开新窗体，显示对应明细 [打印本页]

作者: 0520john 时间: 2015-12-29 15:19
标题: 求助：点击按钮，打开新窗体，显示对应明细
各位ACCESS 大虾：本人新手，在设计窗体按钮时，遇到问题，想请大虾解惑。具体如下：
1.我先设计了一个包含子窗体的主窗体，功能是按照主窗体的文本框，对子窗体数据（子窗体数据源来自一个查询（该查询对表A数据进行汇总））进行筛选，并在子窗体中显示一个汇总表，格式是：比如名称A 件数3；名称B 件数4. 后来想增加明细功能，就在主窗体上增加一按钮，希望实现点击按钮，打开一个新窗体（数据来源来自表A ），用来显示子窗体记录里面对应的明细，比如名称A...，名称A...，名称A...，名称B...，名称B...，名称B...，名称B...，的功能。写了代码以后一直没成功，点击按钮打开的一直是表A的总明细。只能求助，恳请各路大虾指点迷津，谢谢！下面是按照网上搜到的，写的代码，没起到作用：
Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "明细表" ‘新窗体名字

stLinkCriteria = "专利权人 = '" & Me.child1!企业名称 & "'" ’想按照这个字段来筛选

DoCmd.OpenForm stDocName, acFormDS, stLinkCriteria

作者: 0520john 时间: 2015-12-30 09:04
自己顶！没人在吗？

作者: zyp 时间: 2015-12-30 10:02
docmd.openform "明细表"
forms!明细表.recordsource="SELECT * FROM 表A WHERE 专利权人='"& Me.child1!企业名称 &"'"

作者: 0520john 时间: 2015-12-30 10:09

zyp 发表于 2015-12-30 10:02
docmd.openform "明细表"
forms!明细表.recordsource="SELECT * FROM 表A WHERE 专利权人='"& Me.child1! ...

太感谢了！部分功能实现，但是我这个经过文本框查询后，子窗体显示的结果不是一个是多条记录，想显示全部记录的明细。您的这个代码，只能显示第一条，要显示全部的，怎么改呢，麻烦了！

作者: 0520john 时间: 2015-12-30 11:08
Forms!明细表.RecordSource = "SELECT * FROM 历年总表 WHERE 专利权人='" & Me.child1!企业名称 & "' and 年份 ='Me.child1!年份'"，为什么这么写出现，运行时错误2001，你取消了此前的操作

作者: tzh1600 时间: 2015-12-31 16:19
既然能筛选出汇总表
那么把查询汇总表得到的汇总表ID与明细表的ID关联查询不就可以了吗

作者: 0520john 时间: 2016-1-4 08:39

tzh1600 发表于 2015-12-31 16:19
既然能筛选出汇总表
那么把查询汇总表得到的汇总表ID与明细表的ID关联查询不就可以了吗

谢谢哦！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)