应该是你表别的事件影响了吧?比如currentChanged等。
试试
SystemReady = False
e.Form.Controls("Table1").Table.Filter = flt
SystemReady = True