一个窗体中两个子窗体：一个汇总，一个明细，动态关联，如何实现？

laisme888 · 发表于 2020-6-1 23:32

这个需求应用很广，百度了很久也没有得到解决。
如图所示，有个加密锁工作表，用查询做了个汇总表。现在需要在一个主窗体中实现这样一个功能：一个汇总表，一个明细表。当我点击汇总表中的记录，比如第一行，品牌为pkpm，地区为长沙的加密锁有 8个，当我点击这一行的时候，下面的明细表可以显示出对应的8条记录。求高手指导应该如何实现这个需求。

laisme888 · 发表于 2020-6-2 09:25

自己顶起来啊。。。。

ly · 发表于 2020-6-2 10:16

没有主键如何关联？

1.rar (70.77 KB, 下载次数: 246)

laisme888 · 发表于 2020-6-2 10:17

ly 发表于 2020-6-2 10:16
没有主键如何关联？

牛逼，是我想要的效果，厉害了

laisme888 · 发表于 2020-6-3 15:58

自己顶起啊，有没有更好的方法呢

ly · 发表于 2020-6-3 21:56

laisme888 发表于 2020-6-3 15:58
自己顶起啊，有没有更好的方法呢

简单方法：
1、用最初的查询，即不要加ID的字段了。
2、汇总子窗体中原来的【成为当前】代码删除，用下面的替换。

Private Sub Form_Current()
On Error Resume Next
Dim fldName As String
fldName = Me.Recordset!品牌 & Me.Recordset!地区
Me.Parent.[sub加密锁明细].Form.RecordSource = "SELECT 品牌, 地区, 锁号, 状态, 备注, [品牌] & [地区] AS 加密ID FROM 01加密锁 WHERE ([品牌] & [地区])='" & fldName & "'"
End Sub

复制代码

		自动登录	找回密码
密码			免费注册

[求助] 一个窗体中两个子窗体：一个汇总，一个明细，动态关联，如何实现？

评分

评分