以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  提示缺少操作符  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=113728)
--  作者：xxfoxtable
--  发布时间：2018/1/22 10:08:00
--  提示缺少操作符
txt="\'%" & txt.Replace("*", "[*]").Replace("\'", "\'\'").Replace("%", "[%]")  & "%\'"  这个语句针对
压敏电阻10D\'681K
这个品名报错，提示缺少操作符，应该怎么写才对？
--  作者：有点甜
--  发布时间：2018/1/22 10:17:00
--  

代码如下测试没问题。请贴出完整代码，或者上传实例测试。

 

Dim txt = "压敏电阻10D\'681K"
txt="\'%" & txt.Replace("*", "[*]").Replace("\'", "\'\'").Replace("%", "[%]")  & "%\'"
msgbox(txt)
CurrentTable.filter = "第一列 like " & txt
--  作者：xxfoxtable
--  发布时间：2018/1/22 10:56:00
--  
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar
放程序里报错
--  作者：有点甜
--  发布时间：2018/1/22 11:58:00
--  
        If r.IsNull("封装") Then
            filter = "品名 =\'" & r("品名").replace("\'", "\'\'") & "\' and 封装 Is null "
        Else
            filter = "品名 =\'" & r("品名").replace("\'", "\'\'") & "\' and 封装=\'" & r("封装") &"\'"
        End If