以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  表查询问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=140056)
--  作者：bbnnmm2015
--  发布时间：2019/8/28 16:19:00
--  表查询问题
我在做一个分类导出的工具，指定列数据形成一个筛选条件，最终合成格式如下："[住院号]=\'15343416 \' and [姓名]=\'杨言方 \' and [科室]=\'重症医学科 \'"
然后用FOR each语句将筛选条件赋值给Filter，结果报错：Cannot interpret token \'"\' at position 1.
如果我直接将其中之一筛选条件"[住院号]=\'15343416 \' and [姓名]=\'杨言方 \' and [科室]=\'重症医学科 \'"赋值却能通过

Dim aa As String=e.Form.Controls("ComboBox1").text
Tables("数据拆分_Table2").DataSource = DataTables(aa)
Dim ss As String =Tables("数据拆分_Table1").Current("拆分标准")
Tables("数据拆分_Table2").Filter =ss

不能通过，报错
Tables("数据拆分_Table2").Filter ="[住院号]=\'15343416 \' and [姓名]=\'杨言方 \' and [科室]=\'重症医学科 \'"
可以通过
望专家解决难题
--  作者：有点蓝
--  发布时间：2019/8/28 16:24:00
--  
msgbox(ss) 看看完整的条件
--  作者：bbnnmm2015
--  发布时间：2019/8/28 16:35:00
--  
刚才看了，和表中数据是一致的
--  作者：有点蓝
--  发布时间：2019/8/28 17:42:00
--  
msgbox(ss) 
截图看看
--  作者：bbnnmm2015
--  发布时间：2019/8/29 10:21:00
--  查询运行出错截图
将查询条件简化为一个，还是报同样的错误
--  作者：有点蓝
--  发布时间：2019/8/29 10:29:00
--  
msgbox(ss) 
截图看看条件，是不是有多余的空格，回车等符号
--  作者：bbnnmm2015
--  发布时间：2019/8/29 11:14:00
--  
我把表中数据写入一个text控件，同时复制到记事本，字符一模一样，执行结果还是一样，通过赋值不能通过，用黏贴直接给查询条件可以通过
--  作者：有点蓝
--  发布时间：2019/8/29 11:26:00
--  
上传实例说明
--  作者：bbnnmm2015
--  发布时间：2019/8/29 11:52:00
--  
实例上传到附件了
--  作者：有点蓝
--  发布时间：2019/8/29 11:55:00
--  
没看到，上传文件方法：http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78