【求助】重新输入记录，点击搜索，发现没用了，这是为何

todaynew

yangruihao 发表于 2011-8-9 10:35
上次论坛位元老级人物帮忙改的，试了一下可以用，可是我把原先的记录删了，然后重新输入几个记录，点击搜索 ...

Private Sub Command4_Click()
Dim strwh As String
strwh = "True"
If IsNull(Me.Text0.Value) = False Then
    strwh = strwh & " and 客户姓名 like '*" & Me.Text0.Value & "*'"
End If
If IsNull(Me.Text2.Value) = False Then
    strwh = strwh & " and 单位 like '*" & Me.Text2 & "*'"
End If

Me.表1.Form.Filter = strwh
Me.表1.Form.FilterOn = True
End Sub

todaynew

yangruihao 发表于 2011-8-9 15:57
回复 todaynew 的帖子

我试了好些记录，经常查不到哇，怎么办，怎么办，怎么办

使劲查