百度carlⅰfe搜不到目的地 第一次搜索还可以。再一次就搜不到了。需要重启软件且不是每次都行。

如何显示全部 相关文字呢
Private Sub Command1_Click()
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select tempxsph.spid,tempxsph.spmc,kc.sl,tempxsph.dw,tempxsph.ck from tempxsph,kc where tempxsph.spmc ='" & Text1.Text & "'"
Adodc1.Refresh
End Sub
如何修改代码呢
1-小剪刀
2-花剪刀