Office中国论坛/Access中国论坛

标题: 按选项卡页名称筛选数据,请指点一二 [打印本页]

作者: duyu19810000    时间: 2005-7-26 20:25
标题: 按选项卡页名称筛选数据,请指点一二
在窗体中新建一个选项卡控件,但我想要点第一页时出现所有满足此条件的数据,如:第一页名称为:北京则一点此页就在中间区域出现地址为北京的相关人员.

[此贴子已经被作者于2005-7-26 12:26:44编辑过]


作者: secowu    时间: 2005-7-26 20:30
1.设置个隐藏控件   开启过滤2.直接将过滤值从控件名传递
作者: duyu19810000    时间: 2005-7-26 20:54
你的意思是将隐藏控件放在页后边吗?这样可以点击吗?但是我想打开此窗体时第一个选项卡应该不用点击就已经被筛选出来,如果是这样该如何去做?
作者: secowu    时间: 2005-7-26 20:58
上传文件看看

[此贴子已经被作者于2005-7-26 12:58:14编辑过]


作者: duyu19810000    时间: 2005-7-26 22:26
标题: 请指点!
请指点![attach]12025[/attach]



[此贴子已经被作者于2005-7-26 14:30:20编辑过]


作者: 海狸先生    时间: 2005-7-26 22:29
这样的设计,要在每一个选项卡上建一个子窗体,不如用一个组合框加一个子窗体来代替
作者: LucasLynn    时间: 2005-7-26 23:19
窗体内容不要放在选项卡内,而是选项卡“上方”。也就是内容盖住选项卡。
作者: eyewitnes    时间: 2005-7-26 23:27
能不能只做一个子窗体或者列表框,然后用切换按钮代替选项卡修改子窗体或者列表框数据源来实现呢?

[此贴子已经被作者于2005-7-26 15:28:46编辑过]


作者: LucasLynn    时间: 2005-7-26 23:45
以下是引用LucasLynn在2005-7-26 15:19:00的发言:

窗体内容不要放在选项卡内,而是选项卡“上方”。也就是内容盖住选项卡。



这个应该是最简单的方法

Public Sub 窗体_OnLoad()

    Me.FilterOn=True

End Sub

Public Sub 选项卡_OnChange()

    Me.Filter="[部门]='" & 选项卡.Pages.Item(选项卡.Value).ControlName & "'"

End Sub

记住:内容“不要”放在选项卡,而是放在选项卡上。

[此贴子已经被作者于2005-7-26 15:47:45编辑过]


作者: secowu    时间: 2005-7-27 00:23
以下是引用LucasLynn在2005-7-26 15:45:00的发言:







这个应该是最简单的方法

Public Sub 窗体_OnLoad()

    Me.FilterOn=True

End Sub

Public Sub 选项卡_OnChange()

    Me.Filter="[部门]='" & 选项卡.Pages.Item(选项卡.Value).ControlName & "'"

End Sub

记住:内容“不要”放在选项卡,而是放在选项卡上。



经典
作者: 平静    时间: 2005-10-11 23:15
[em01]
作者: xinrenq    时间: 2005-10-12 00:30
[attach]13570[/attach]



方法类似。。
作者: 爱情插班生    时间: 2005-10-12 01:49
驼铃哑默你要的这个附例:

[attach]13576[/attach]

[em01][em01][em01]

我看了一下xinrenp的例子,差不多...比我的好...

[此贴子已经被作者于2005-10-11 17:57:04编辑过]


作者: duyu19810000    时间: 2005-10-12 06:05
谢谢了,各位。非常感激,好人一生平安!!!!!!!
作者: CYH7201    时间: 2005-10-12 16:23
感谢两位提供例子上来.
作者: fangkinght    时间: 2008-4-1 09:29
[:33] [:25] [:25] [:25] [:25]
作者: chenlugen    时间: 2008-8-3 22:50
我也来瞧瞧




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3