主题：打印行数设置

贺老师11月21口更新，增加了每页打印行数功能，给我们带来了许多方便，基本上可以抛开excel报表，若再能增加这两项功能就更好了：
一、可以通过变量设置打印行数；
二、通过窗口中的table控件打印分页报表的，在每页上可以设置“第几页共几页”的功能。

我知道在属性中可以设置打印行数，但如何用变量设置打印行数？
贺老师不要卖关子了，你就讲一下如何设置吧！！！

页眉页脚那里有，但窗口打印用不上的。

在每页上可以设置“第几页共几页”的功能，怎么设置？

e.Form.Controls("窗口1_Table1").MaxRows = 12

有局限性：table控件设置成副本，而打印的table不能为副本。

e.Form.Controls("窗口1_Table1").MaxRows = 12

提示找不到“窗口1_table1"的控件。

窗口1是窗口名称
Table1是表名称
tablej是副本

此主题相关图片如下：未命名.gif

还有一个问题，使用副本，不能进行分类汇总。

Dim doc As PrintDoc = e.Form.GernatePrintDoc()
e.Form.Controls("Table1").MaxRows = 12
doc.Preview()

打印出来的不是12行，这个代码有问题么？