Dim bh As winform.textbox=e.form.controls("编号")
Dim mc As winform.combobox=e.form.controls("名称")
Dim xh As winform.combobox=e.form.controls("型号")
Dim dd As winform.textbox=e.form.controls("地点")
Dim rq As winform.textbox=e.form.controls("检定日期")
Tables("量具台账").filter = " 统一编号 Like '*"& bh.text &"*'and 名称 = '"& mc.text &"'and 型号 = '"& xh.text &"'and 使用地点 like '*" & dd.text & "*' and 检定日期 Like '"& ri.text &"'"
以上合成表达式错误求大师指点谢谢