[求助]如何按每页生成6个记录数呢？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]如何按每页生成6个记录数呢？

共有1939人关注过本帖树形打印复制链接主题：[求助]如何按每页生成6个记录数呢？

hrw68529

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：五尾狐帖子：1142 积分：8900 威望：0 精华：0 注册：2012/7/10 9:09:00

[求助]如何按每页生成6个记录数呢？ 发帖心情

Post By：2017/12/1 14:11:00 [显示全部帖子]

下边代码每页生不成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

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：五尾狐帖子：1142 积分：8900 威望：0 精华：0 注册：2012/7/10 9:09:00

Post By：2017/12/1 14:13:00 [显示全部帖子]

每页共3排，每排2个，如何生成？谢谢

hrw68529

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：五尾狐帖子：1142 积分：8900 威望：0 精华：0 注册：2012/7/10 9:09:00

Post By：2017/12/1 16:38:00 [显示全部帖子]

谢谢有点甜，用第二个方法，棒极了

主题：[求助]如何按每页生成6个记录数呢？