这个代码搜索不全
如何显示全部 相关文字呢
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-花剪刀
3-铁皮剪刀
4-钢筋剪刀
输入“剪刀”搜索不到
输入“?剪刀”出现 小剪刀 和花剪刀
输入“??剪刀”出现铁皮剪刀 和 钢筋剪刀
能不能输入“剪刀”4个剪刀一起出来
------解决思路----------------------
like是用%
tempxsph.spmc like '%" & Text1.Text & "%'"