strSQL1 = "Select * From 产品出库表 Where 名称 like " _
             + "'" + Replace(Trim(Text1.Text), "'", "''", 1) + "%'"

请教大虾们有何错误

应该是对replace使用错误，你大概是要消除单引号，但你的语句却是把一个单引号用两个单引号代替了，假如你的原文本是“abcd'ef”，用你的replace后就变成“abcd''ef”了，正确语句如下：
strSQL1 = "Select * From 产品出库表 Where 名称 like " _
             + "'" + Replace(Trim(Text1.Text), "'", "", 1) + "%'"

还是调试不过呀。。[附件]1[/附件]

你这个代码从哪里弄来的啊？感觉不像是你自己写的么，用别人的代码要先读懂别人的意思啊

strSQL1 = "Select * From 产品出库表 Where 名称 like Trim(Text1.Text)"
这个为何也不行

strSQL1 = "Select * From 产品出库表 Where 名称 like'" & Trim(Text1.Text) & "'"
1看就知道你不懂语法规则。。。。。。。。
凡是sql语句中变量是vb的变量 都要加上'"& 变量 &"'

依然无法查询 还是报未发现数据库名称并且未指定数据库驱动，然后报对象Refresh的方法IAdodc失败

朋友，你检查一下你的adodc控件有没有设置连接属性..........