[求助]表条件加载代码出错（已解决） - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

一段代码，根据窗口的日期和单位的选项对表进行加载，运行出错，提示：标准表达式中数据类型不匹配。如何修改，请各位老师指教，谢谢！

Dim rq As Date = Forms("菜单").Controls("DateTimePicker1").Text '日期

Dim dw As String = Forms("菜单").Controls("ComboBox1").Text '单位

Dim filter As String

filter = "日期 = '" & rq & "'"

If dw <> "" Then

filter = filter & " And 单位 = '"& dw &"'"

End If

DataTables("实时采集").LoadFilter = filter

DataTables("实时采集").Load

[此贴子已经被作者于2014-10-9 19:54:01编辑过]

主题：[求助]表条件加载代码出错（已解决）