VBA运算符不喜欢

Question

目前，我在表单上使用了一个过滤器：

Me.Filter = "[duedate] = '" & Me.duedatesearch & "' And [employeename] Is Null"
Me.FilterOn = True

这个很好用。我所挣扎的是试图从一个叫做“工作”的不同领域中排除一个结果。例如，如果符合上述标准，并且工作不像“荷马”。不像似乎不是一个有效的VBA运算符。有什么想法吗？

谢谢。

我尝试了以下几点：

Me.Filter = "[duedate] = '" & Me.duedatesearch & "' And [employeename] Is Null" And Not [workingfor] Like "Homer"
Me.FilterOn = True

返回运行时错误“13”：类型不匹配

Answer 1

当前代码中的几个问题：

• 正如您在发布问题时从语法突出显示中观察到的那样，筛选器的最后一部分不是初始字符串的一部分，因为在Null后面有一个双引号。
• 除非将Like表达式括在括号内，否则适当的运算符是Not Like。

例如：

Me.Filter = "[duedate] = '" & Me.duedatesearch & "' And [employeename] Is Null And [workingfor] Not Like 'Homer'"
Me.FilterOn = True

但是，由于您在Like模式中没有使用任何通配符，因此可以使用不相等运算符(<>)编写该运算符：

Me.Filter = "[duedate] = '" & Me.duedatesearch & "' And [employeename] Is Null And [workingfor] <> 'Homer'"
Me.FilterOn = True

另外，我觉得奇怪的是，您的字段[duedate]似乎是一个字符串值字段，而不是日期字段。