主题：显示本日到期的记录错误在哪里

1、一下代码显示本日记录，错误在哪里，不出来结果

Dim tbl As Table = Tables("窗口意向管理_tblYixiangguanli")
tbl.Filter = "returnDate='"& date.Today & "'"

2、如果把显示本周记录该过滤条件怎么写