主题：错误代码

Dim tb As Table = Tables("人员信息").Filter = "[联系人] = '" & dr.Current("查询人") & "'"

这行代码错误在什么地方了，执行时提示如下：

.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2015.12.22.1
错误所在事件：Build
详细错误信息：
无法将类型为“System.Boolean”的对象强制转换为类型“Foxtable.Table”。