以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 筛选问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=32059)

--  作者:thetonys
--  发布时间:2013/4/25 9:12:00
--  [求助] 筛选问题
订单表中有一行AC5847-A, 筛选时,输入 5847, 找不到记录,请帮高手指点以下代码,谢谢!

With e.Form.Controls("zhidan")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "FtyNo Like \'*" & .Value & " \' "
    End If
    
End With

--  作者:Bin
--  发布时间:2013/4/25 9:14:00
--  
因为你后面还有-A
Filter = Filter & "FtyNo Like \'*" & .Value & " *\' "

--  作者:thetonys
--  发布时间:2013/4/25 9:22:00
--  
以下是引用Bin在2013-4-25 9:14:00的发言:
因为你后面还有-A
Filter = Filter & "FtyNo Like \'*" & .Value & " *\' "


Bin, 感谢啦!