主题：[讨论] 关于填充器 New Filler 里面的筛选条件 filter 中引用全局变量，如何写代码？

我写了这样一段代码：

 

dim dqpz As New Filler

dqpz.SourceTable = DataTables("会计凭证查询") '指定数据来源

dqpz.SourceCols = "sszt,pzrqn,pzrqy,pzrqr,pzlx,pzdm,flxh,pzzy,kmdm,jdfx,flje,cjyh,fdzs" '指定数据来源列

dqpz.DataTable = DataTables("会计凭证") '指定数据接收表

dqpz.DataCols = "账套编号,年,月,日,pzlx,凭证编号,flxh,凭证摘要,科目代码,jdfx,flje,制证人,附件张数" '指定数据接收列

dqpz.ExcludeExistValue = true

dqpz.ExcludeNullValue = true

dqpz.Distinct = true

dqpz.filter ="pzrqn = "& vars("kn") & "and pzrqy <= "& vars("ky") & "and pzrqy >= " & vars("jy") & "pzrqr <= "& vars("kr") & "and pzrqr >= " & vars("jr")

dqpz.Fill() '填充数据


系统提示dqpz.filter 有误，我删除就好了。

我想可能是双引号和单引号的问题。

请教各位!

#  ？？

都是整数型的，不是日期型的!

为什么要这样子写呢？

解释一下好吗？

我的多了&，并且and在“”的外面。

为什么？

数值型的，好理解!但是字符型和日期型就有这样的情况：

我发现下面这两段代码中的 filter 都是有效的，至少没有报错，并且达到了我想要的重置、删除的效果：

DataTables("会计凭证").DataCols("附件张数").RaiseDataColChanged("[日期] <= #"&vars("结束日期")&"# And [日期] >= #"&vars("开始日期")&"#")

DataTables("会计凭证").DeleteFor("[校验] = 0 and [日期] >= '"&vars("开始日期")&"' and [日期] <= '"&vars("结束日期")&"'")


注：[日期]、vars("开始日期")、vars("结束日期")都是日期型的!

按规则应该是第一条正确，第二条不对!

但是，如果我用字符变量替换引用一下：
dim s as string = "[日期] <= #"&vars("结束日期")&"# And [日期] >= #"&vars("开始日期")&"#"
DataTables("会计凭证").DataCols("附件张数").RaiseDataColChanged(s)

则代码不能保存，报变量 S 的错!

请各位大侠指教!