请各位大侠帮我看看这到底是怎么回事

[zhuqingxipy]

Dim cnn1 As ADODB.Connection
Dim rs2 As ADODB.Recordset
Dim cmd1 As ADODB.Command
Dim str1 As String

Set cnn1 = New ADODB.Connection
Set rs2 = New ADODB.Recordset
Set cmd1 = New ADODB.Command

str1 = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\Database\stock.mdb;"

cnn1.Open str1
Set cmd1.ActiveConnection = cnn1
cmd1.CommandText = "Select * from Bank where name like '*b*'"
cmd1.CommandType = adCmdText
Set rs2 = cmd1.Execute


为什么这个查询做不了,查出来是空记录

[luzufu]

cmd1.CommandText = "Select * from Bank where name like '% "& b &"% '"

[海牛]

cmd1.CommandText = "Select * from Bank where name like '%b%'"

[gogo313]

模糊查找用% 不用 *

[xzp1030]

不知你了b是不是变量，要是变量的话应该这样。
cmd1.CommandText = "Select * from Bank where name like '% "& b &"% '"