本人写的模糊查询，请各位帮我看看，为什么不能运行，还有其它的一些问题。谢谢
Dim strsql As String
Dim adors As New Recordset
adors.ActiveConnection = ADOcn
adors.Find "ISBN like '* " + Text1.Text + "* ' "
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from 出版社资料 where ISBN like ' " & "* " + Text1.Text + "* " & " ' "
Csetting.Adodc1.Refresh
DataSource = Adodc1.Recordset
DataGrid1.Refresh
怎么会运行不起来呢。
还有一个问题：
在VB里，加了 一个窗体form1，再加一个窗体form2,
在form1用form2.show调用form2，在form2的form_load事件中，检测出不满足某种条件，要卸载form2,我用unload me可为什么会提示对象已加载。？
[解决办法]
sql server 用 %
like '%123% '
还有一个问题：
form2写一个public方法showme
publuc sub showme
if true then
unload me
exit sub
endif
me.show
end sub
在form1用form2.showme调用form2
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)
最新版本：20070212
http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html
[解决办法]
你使用ADO控件,就不要使用ADO数据对象,代码修改如下:
Dim str As String
str = "Provider=Microsoft.Jet.OLEDB.4.0;;Persist Security Info=False;Data Source= "c:\studentsinfo.mdb "
Adodc1.ConnectionString = str
Adodc1.RecordSource = "select * from 出版社资料 where ISBN like ' " & Text1.Text & "% ' "
Adodc1.Refresh
其它请参阅http://zhidao.baidu.com/question/18200814.html的本人答复
