如何用VBA语句控制子窗体中的子表

kingorwell　发表于：2015-04-01 00:11:49 　

我在窗体中建了一个组合框“筛选查看此月考勤"，组合框选中某月（比如图中2015-03）后，会在子窗体中的子表中形成filter，这个filter会在”年月“字段中筛选出2015年3月的相应记录，应该怎样用语句实现此功能？功课的最后一个难点了，还请大仙们指教！

煮江品茶发表于：2015-04-01 08:40:23

在控件的更新后事件中写：

dim frm as form

set frm=me.阁下的一级子窗体的名称.form.controls("阁下二级子窗体的名称").form

frm.filter="年月='" & nz(me.年月.value) & "'"

frm.filteron=true

set frm=nothing

深入学习的话，参见：http://www.accessoft.com/blog/article-show.asp?userid=10802&Id=7655

kingorwell 发表于：2015-04-01 11:22:27

谢谢前辈告诉了我一个以前没接触过的概念，非常有益！但运行后还有些卡壳，能给再指点指点吗？

煮江品茶发表于：2015-04-01 11:52:17

查一下孙窗体控件（不是孙窗体本身）的名称是否是岗位出勤记录，如果不是要么修改代码，要么修改控件名称。

kingorwell 发表于：2015-04-01 15:50:42

我查了，那个孙窗体实质上是一个表，是不是不应该在“set frm=me.阁下的一级子窗体的名称.form.controls("阁下二级子窗体的名称").form”中最后的form性质要改动一下？我真的对此很感兴趣！！

我对此

煮江品茶发表于：2015-04-01 16:51:11

建一个对应的窗体，然后拖入子窗体控件加载这个窗体。

何保辛发表于：2015-04-01 23:03:45

数据关联展示的子表，是不可以再设置筛选条件的，一定要加孙窗体。

Private Sub 筛选查看当月考勤_AfterUpdate()

Set frm = Me!父窗体中子窗体控件名称.Form!子窗体中孙窗体的控件名称.Form

frm.Filter = "年月='" & Nz(me!年月) & "'"

frm.FilterOn = true

End Sub

kingorwell 发表于：2015-04-02 21:58:32

这个孙窗体无法建起来，不信你们给试试看？（见上面的附件）

总记录：7篇页次：1/1 9 1 :

Access交流中心