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

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报表？

不可能呀？你几呼是套用帮助中一段代码。加我的QQ468163809，详谈。

 代码是正确的，你再检测一下你的模板，表达式要用半角 http://www.foxtable.com/help/topics/2885.htm

我都写了几次了。。如果不行的话，为什么前两条记录又能读出来？后面的记录读不出来？

 例子发上来测试。