主题：[求助]筛选问题?

示例"筛选窗口.table"中,开始日期设为1999-02-02 其它为空白筛选项后

运行如下代码

Dim dk As dataRow
dk = dataTables("订单").Find("产品 = 'PD03'")
dk("日期")=#02/02/1999#.adddays(-1)

该行自动隐藏,

手工将日期改为1999-02-01时不会隐藏

用什么方法可以改动日期又不会隐藏?