Private Sub ComFind_Click()
If TxtFind.Text = "" Then
MsgBox "请选择查询项目并输入查询内容!", 48, "提示"
Exit Sub
End If
Datal.Recordset.FindFirst Combfind.Text & "=" & "'" & TxtFind.Text & "'"
If Data1.Recordset.NoMatch Then
MsgBox "记录不存在", 64, "提示"
End If
End Sub
这是我的代码 但是运行起来显示的是实时错误424。 请教一下该如何解决