大家近来帮帮忙

Question

我用data控件访问数据库：
Private Sub Command5_Click()
Dim strtemp As String
strtemp = Trim(InputBox("请输入姓名："))
Dim s
s = Data1.Recordset.Book
Data1.Recordset.MoveFirst
Data1.Recordset.FindLast "姓名 like '" + strtemp + "'  "
If Data1.Recordset.NoMatch Then
MsgBox "没有找到！"
Data1.Recordset.Book = s
End If
End SubData1.Recordset.FindLast "姓名 like '" + strtemp + "'  "这句代码用来查找
我想用like“*string*“这样的形式查找，就编了这句代码：
Data1.Recordset.FindLast "姓名 like  '*  " + strtemp + "   *  '"这样却不行，我该怎吗办？

Answer 1

Data1.Recordset.FindLast "姓名 like  '%" + strtemp + "%'"
再试试

Answer 2

Data1.Recordset.FindLast "姓名 like  '%" & strtemp & "%'"

Answer 3

SQL语句里模糊查询用%表示任意字符，_表示单个字符