Foxtable(狐表)用户栏目专家坐堂 → 我选择了6条记录,只有2条记录能全部读出到WORD报表


  共有3089人关注过本帖平板打印复制链接

主题:我选择了6条记录,只有2条记录能全部读出到WORD报表

帅哥哟,离线,有人找我吗?
鄢炼
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:10 积分:136 威望:0 精华:0 注册:2014/12/11 5:18:00
我选择了6条记录,只有2条记录能全部读出到WORD报表  发帖心情 Post By:2014/12/13 16:43:00 [只看该作者]

Dim rs As List(of Row) = Tables("用户表").GetCheckedRows
If rs.Count > 0 Then '如果存在符合条件的行
    Dim tm As String  = ProjectPath & "Attachments\自愿申请表.doc" '指定模板文件
    Dim fl As String = ProjectPath & "Reports\申请表.doc" '指定目标文件
    Dim wrt As New WordReport(Tables("用户表"),tm,fl) '定义一个WordReport
    For Each r As Row In rs '逐行生成报表
        wrt.BuildOne(r)
    Next
    wrt.Show() '显示报表
End If

 

我选择了6条记录,只有2条记录能全部读出到WORD报表,从第三条开始,就只能读出部分记录到WORD报表?


 回到顶部