Question

vb中在数据库中查找数据时出现“对象变量或WITH块语句未设置”

Answer 1

应该是你定义Recordset变量的时候只进行了声明，也就是"dim rs as Recordset"。
这时一定如果调用变量rs就会产生你问题中的错误提示。

定义对象变量时没有使用 New 关键字，则在使用该变量之前，必须使用 Set 语句将该引用对象的变量赋值为一个已有对象。

在调用rs之前要
set rs=New Recordset
这样就不会产生错误了

Answer 2

这个错误大多是源代码中有语法错误或者漏写了某些语句，跟数据库啥的无关。