主题：[求助],请行家帮忙看下错误在哪？

我正在学习FoxTable，练习了一个项目，项目中有一个"采购申请统计"表，我想在项目事件切换表事件中加入如下代码实现切到该表时自动筛选显示当月的记录，但总是报错说"未找到列[m2]"，请前辈们指教！ 谢谢！

With Tables("采购申请统计")
    Dim m1 As Date = Date.Today
    Dim m2 As Date = New Date(m1.Year,m1.Month,1)
    .Filter = "[申请日期] >m2 And [申请日期] <=m1"
End With