1、excel模板要改一下 [修理内容] 改成 <修理内容>
2、编写报表事件 报表事件BuildDetail
Select Case e.Book.TempLate Case "book5" If e.DataRow IsNot Nothing AndAlso e.DataRow.Isnull("修理内容") = False Then e.Book.Marks("修理内容") = e.DataRow("修理内容").Replace(",", vbcrlf) End IfEnd Select