以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何按每页生成6个记录数呢?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=110355)

--  作者:hrw68529
--  发布时间:2017/12/1 14:11:00
--  [求助]如何按每页生成6个记录数呢?
下边代码每页生不成6个记录数,如何设置呢?谢谢
图:
图片点击可在新窗口打开查看此主题相关图片如下:截图02.jpg
图片点击可在新窗口打开查看

代码如下:

Dim tm As String  = ProjectPath & "Attachments\\讲课抽签顺序表.doc" \'指定模板文件
Dim fl As String = ProjectPath & "Reports\\讲课抽签顺序表.doc" \'指定目标文件
Dim wrt As New WordReport(Tables("人员抽取_人员"),tm,fl) \'定义一个WordReport
wrt.Build() \'逐行生成报表
wrt.RecordsOnEachPage = 6 \'每页生成6个记录数
wrt.Show() \'显示报表

--  作者:hrw68529
--  发布时间:2017/12/1 14:13:00
--  
每页共3排,每排2个,如何生成?谢谢
--  作者:有点甜
--  发布时间:2017/12/1 15:50:00
--  

方法一:

 

把要打印的数据,拷贝到一张新的表格,这个表格,有两个时间列、两个面试场次、两个学科列......

 

然后根据这张新表设计word报表;

 

方法二:

 

用excel报表 http://www.foxtable.com/webhelp/scr/1414.htm

 


--  作者:hrw68529
--  发布时间:2017/12/1 16:38:00
--  
谢谢有点甜,用第 二个方法,棒极了