主题：下拉窗口的过滤条件未及时更新，应该如何设置啊？

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

问题：打开窗口，选择组合框的值后，过滤生效；当再次选择组合框的其他的值时，下拉框的过滤失效了（一直显示第一次过滤的结果）。

下拉窗口的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