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

yangruihao

上次论坛位元老级人物帮忙改的，试了一下可以用，可是我把原先的记录删了，然后重新输入几个记录，点击搜索没记录哦。这是为何，哪位仁兄可以帮帮再改改吗？谢谢了

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

yangruihao

回复 todaynew 的帖子

我试一下先，谢谢版主哈

yangruihao

回复 todaynew 的帖子

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

sgrshh29

回复 yangruihao 的帖子

todaynew

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

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

使劲查

aslxt

todaynew 发表于 2011-8-9 17:06
使劲查

版主真好。

yangruihao

回复 sgrshh29 的帖子

这个里面有什么新变化，还是就改了代码，因为我原先那个已经输入数据了，不想重新输，唉。谢谢了哈

yangruihao

todaynew 发表于 2011-8-9 17:06
使劲查

版主爱说笑，这么多论坛见到最好的版主哇

mag770t

执着啊！