VB数据库查询按钮编程
Private Sub CmdFind_Click()If TxtFind.Text = "" Then
MsgBox "请选择查询项目并输入查询内容!", 48, "提示"
Exit Sub
End If
Data1.Recordset.FindFirst ComdFind.Text&"="&"'"&TxtFind.Text"'"
If Data1.Recordset.NoMatch Then
MsgBox "记录不存在", 64, "提示"
End If
请问这句话,系统提示,
Data1.Recordset.FindFirst ComdFind.Text&"="&"'"&TxtFind.Text"'"
缺少结束语句: