以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  专业报表  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=73006)
--  作者：kaituozhe
--  发布时间：2015/8/10 21:16:00
--  专业报表
rt.Text= "[Fields!产品.Value]" \'设置打印字段，这样会把绑定表该列的所有内容都显示出来，希望能设定一个条件，只打印自己符合条件的内容，是否可以，怎么编写代码
--  作者：大红袍
--  发布时间：2015/8/10 22:06:00
--  

打印之前，筛选一下就行。如

 

Tables("表A").Filter = "第一列 = \'3\'"

Dim doc As New PrintDoc
Dim rt As New prt.RenderText
rt.DataBinding.DataSource = BindTables("表A") \'将rt绑定到订单表
rt.Text= "[Fields!第一列.Value]" \'设置打印字段
doc.body.Children.Add(rt)
doc.Preview()