主题：新版本中 BeforSort事件不起作用？

如题，我的BeforeSort事件中的代码是：

if e.Table.name="代收款银行账_Table1"
   if e.Sort<>"日期"
     e.Cancel=True
   end if
end if

好像不起作用。