[求助]逐行生成word报表时，如果该行无数据，就删除该行 Post By：2016/8/24 13:01:00 [只看该作者]
根据说明中的代码，如果遇到，逐行生成word报表时，表中无该行数据，那么就删除该行，需要怎样改动？
Dim tm As String = ProjectPath&"Attachments\出库单.doc"'指定模板文件 Dim fl As String = ProjectPath&"Reports\出库单.doc"'指定目标文件 Dim wrt As NewWordReport(Tables("出库"),tm,fl) '定义一个WordReport For Each dr As DataRow In drs'逐行生成报表 wrt.BuildOne(dr) Next wrt.Show() '显示报表 End If
加好友 
发短信
Post By：2016/8/24 13:01:00 [只看该作者]
