| 以文本方式查看主题 - 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=61201) |
| -- 作者：i4whylg -- 发布时间：2014/12/8 20:48:00 -- [求助]多行数据生成的多页专业报表如何同时预览？ 请教各位老师，如下代码每次只能显示一行已归档的报表，关闭后生成下一个，能不能在预览时同时显示所有已归档为true的报表呢 For Each dr As DataRow In DataTables("总台账").Select("已归档 = true")
Dim doc As New PrintDoc() \'定义一个报表
......
doc.Preview() \'预览 Next |
| -- 作者：有点甜 -- 发布时间：2014/12/8 20:50:00 -- 那就换一种思路
Dim doc As New PrintDoc() \'定义一个报表 For Each dr As DataRow In DataTables("总台账").Select("已归档 = true")
Next
doc.Preview() \'预览
|
| -- 作者：i4whylg -- 发布时间：2014/12/8 20:54:00 -- [求助]多行数据生成的多页专业报表如何同时预览？ 不行的，我也试过了，这样会在同一页报表上生成，数据都印在一起了。 |
| -- 作者：i4whylg -- 发布时间：2014/12/8 20:58:00 -- 解决了，还是要多看帮助啊 Dim rep As New prt.RenderEmpty \'定义一个新的空对象
rep.BreakBefore = prt.BreakEnum.Page \'打印前换页 doc.Body.Children.Add(rep ) \'加入到报表中 |
| -- 作者：有点甜 -- 发布时间：2014/12/8 20:58:00 -- 你可以强制换页的嘛
http://www.foxtable.com/help/topics/1196.htm
|
| -- 作者：i4whylg -- 发布时间：2014/12/8 21:00:00 -- [求助]多行数据生成的多页专业报表如何同时预览？ 是的，就是这个，谢谢甜版 |