主题：[求助]多项条件组合搜索按钮代码的编写

搜索按钮如果不加入“月历”控件的数据，就能正常运行

如果加入了“月历”控件，当前选择的日期的数据就提示第二张图片的错误，不知道是哪里错了。

还有，多条件查找的时候，代码会变成灰色（代码可用），不方便看，请问如何解决，见图三

代码为：

 

Dim rq As WinForm.Calendar = e.Form.Controls("日期")
Dim hbh As WinForm.TextBox = e.Form.Controls("航班号")
Dim hd As WinForm.TextBox = e.Form.Controls("航段")
Dim aqy As WinForm.TextBox = e.Form.Controls("安全员")

Tables("勤务信息表").Filter ="日期 =#rq.value # and 航班号 like '*"& hbh.Value & "*' and 航段 like '*" & hd.Value & "*' and 安全员 like '*" & aqy.Value & "*'"

 

 图一为设计窗体

此主题相关图片如下：1.png

 

图二为错误提示

此主题相关图片如下：2.png

图三为灰色的代码。

此主题相关图片如下：3.png

......Filter = "日期= #" & rq.value & "# and ......

谢谢老师

请问老师，代码灰色怎么处理呢？

 

&符号前后加空格