以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  下拉窗口的过滤条件未及时更新,应该如何设置啊?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=139221)

--  作者:guosheng
--  发布时间:2019/8/8 14:33:00
--  下拉窗口的过滤条件未及时更新,应该如何设置啊?

下拉窗口 会根据调用其的  窗口 中的组合框的值,进行过滤。

问题:打开窗口,选择组合框的值后,过滤生效;当再次选择组合框的其他的值时,下拉框的过滤失效了(一直显示第一次过滤的结果)。

 

下拉窗口的aferload事件:

Dim y As String =int( Forms("窗口1").Controls("ComboBox1").text)   \'将text改成value也一样没有更新

Dim dt1 As New Date(y, 1, 1)
Dim dt2 As New Date(y, 12, 31)
Dim Filter As String
Filter = "最新结转日期 >= #" & dt1 & "# And 最新结转日期 <= #" & dt2 & "#"
Tables("下拉窗口_Table1").filter=Filter

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目19.foxdb


--  作者:有点蓝
--  发布时间:2019/8/8 14:44:00
--  
代码放到DropDownOpening事件