求助查找文字型代码

huimian2006

以前rjacky版主帮我做了一个查找条件，是数字型的， 如果现在换成文字型的，要怎么改？

Private Sub 查找条件_AfterUpdate()
If DCount("[房地产他项权证第]", "房地产他项权证", "[房地产他项权证第]=" & Nz(Me.查找条件, 0)) > 0 Then
      Me.房地产他项权证第.SetFocus
      DoCmd.FindRecord Me.查找条件
Else
     DoCmd.GoToRecord , , acNewRec
     Me.房地产他项权证第 = Me.查找条件
     Me.房地产他项权人.SetFocus
End If
End Sub

tmtony

"[房地产他项权证第]=" & Nz(Me.查找条件, 0))
改为 "[字段名]='" & Nz(Me.查找条件, "")) & "'"

huimian2006

不行啊，老出错误。怎么回事儿呢。