Foxtable(狐表)用户栏目专家坐堂 → [求助]筛选按钮的实现


  共有1725人关注过本帖树形打印复制链接

主题:[求助]筛选按钮的实现

美女呀,离线,留言给我吧!
feng1999
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:100 积分:706 威望:0 精华:0 注册:2017/1/5 15:06:00
[求助]筛选按钮的实现  发帖心情 Post By:2017/3/20 15:52:00 [只看该作者]

老师好,下面这个项目有个问题需要帮忙解决一下:想要实现的功能(两个窗口中的table是同一个)
1.基础数据查询目录下的电解电容数据窗口只加载日期为date.today的数据(不是开发者登录的时候)
2.检验记录报告下的电解电容窗口只加载除去今天之外近150天的数据(不是开发者登录的时候)
遇到的问题是:
项目刚打开的时候上面的功能可以实现,但是通过筛选按钮进行筛选的时候上面所想实现的功能均不能正常实现,请老师帮忙解决一下,谢谢!

 回到顶部
美女呀,离线,留言给我吧!
feng1999
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:100 积分:706 威望:0 精华:0 注册:2017/1/5 15:06:00
  发帖心情 Post By:2017/3/20 15:52:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试系统试用版-1.table


 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/20 16:42:00 [只看该作者]

1、

 

Dim Filter As String = "日期 = #" & Date.Today & "#"
With e.Form.Controls("材料代号")
    If .Value IsNot Nothing Then
        Filter &= " and 材料代号 = '" & .Value & "'"
    End If
End With
Tables("电解电容").Filter = filter

 

2、和1同理。

 

3、建议你用加载的方式,而不是筛选,不然,你撤销筛选的时候,就可以看到全部数据了,不好控制

 

http://www.foxtable.com/webhelp/scr/2256.htm

 


 回到顶部
美女呀,离线,留言给我吧!
feng1999
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:100 积分:706 威望:0 精华:0 注册:2017/1/5 15:06:00
  发帖心情 Post By:2017/3/20 16:54:00 [只看该作者]

用加载的方式的话两个窗口中的Table显示的都是同一个加载条件的数据表,能否根据窗口的名称不同来显示不同的加载数据?

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/20 17:39:00 [只看该作者]

以下是引用feng1999在2017/3/20 16:54:00的发言:
用加载的方式的话两个窗口中的Table显示的都是同一个加载条件的数据表,能否根据窗口的名称不同来显示不同的加载数据?

 

你打开窗口的时候,不是可以指定?窗口AfterLoad事件

 

DataTables("电解电容").LoadFilter = "日期 = #" & Date.Today & "#"

DataTables("电解电容").Load

 


 回到顶部