--
如果是access数据库,用cstr函数,如果是sqlserver,请改成 convert(varchar, 改造后完工日期, 120)
Dim tb1 As WinForm.TextBox = e.Form.Controls("TextBox1")
DataTables("照片").LoadFilter="组别 Like \'%" & tb1.text & "%\' or 编号 Like \'%" & tb1.text & "%\' or 类别 Like \'%" & tb1.text & "%\' or cstr(改造后完工日期) Like \'%" & tb1.text & "%\'"
DataTables("照片").Load()
[此贴子已经被作者于2018/1/18 14:23:33编辑过]