Dim cpth As WinForm.TextBox = e.Form.Controls("产品图号")
Dim zwmc As WinForm.TextBox = e.Form.Controls("中文名称")
Dim zwcl As WinForm.TextBox = e.Form.Controls("中文材料")
Dim zwgg As WinForm.TextBox = e.Form.Controls("中文规格")
Tables("产品").Filter="产品图号 like '*" & cpth.Value & "*' and 中文名称 like '*" & zwmc.Value & "*' and 中文材料 like '*" & zwcl.Value & "*' and 中文规格 like '*" & zwgg.Value & "*'"
建立了四个文本框,每个文本框单独模糊查询, 代码如上!, 但每次查询一个后, 按全部显示, 再重新查询其他三个文本框却无任何数据, 问题出在哪里呢, 请大家指教!