以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何在这个地方限制每页只能打印10行数据  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=92300)

--  作者:天蝉一线
--  发布时间:2016/10/31 14:30:00
--  如何在这个地方限制每页只能打印10行数据
代码如下:

Dim Count As Integer =0
              For Each Col As DataCol In Dt.DataCols
                rt.Cells(6,Count).Text = Col.Name
            For r As Integer = 0 To dt.DataRows.Count -1
                rt.Cells(r +6,Count).Text =dt.dataRows(r)(Col.Name)
            Next
            Count = Count + 1
Next
rt.Cols(0).Style.TextAlignHorz = prt.AlignHorzEnum.Center
rt.Cols(1).Style.TextAlignHorz = prt.AlignHorzEnum.Center
rt.Cols(2).Style.TextAlignHorz = prt.AlignHorzEnum.Center

这个后面怎么加代码限制每页只能打印10行,超过10行换页打印。

--  作者:有点蓝
--  发布时间:2016/10/31 15:36:00
--  
参考:http://www.foxtable.com/webhelp/scr/1196.htm