主题：汇总内容到其他单元格问题

请教老师，下面代码，想把校对和审核单元格的内容汇总到指定质量评价人里面，请教请教

If e.DataCol.Name = "校对" AndAlso e.DataCol.Name = "审核" Then 
   Dim pdr As DataRow = DataTables("质量评价").find("任务索引 = '" & e.DataRow("任务索引") & "'")
        If pdr IsNot Nothing Then
            Dim str As String = ""
            Dim str1 As String = ""
            For Each dr As DataRow In DataTables("工作策划副表").Select("任务索引 = '" & e.DataRow("任务索引") & "'")
                str & = dr("校对")  & vbcrlf & vbcrlf
                str1 & = dr("审核")  & vbcrlf & vbcrlf
            Next
            pdr("指定质量评价人") = str.trim(chr(10), chr(13)) & str1.trim(chr(10), chr(13))
    End If
End If

老师，上面的代码，无法把工作策划副表 中的“校对”和“审核”单元格的内容汇总到质量评价表中的“指定质量评价人”里面  任务索引号是同一个

例如： 表A     校对    审核     任务索引

                   小张     老马    001

         表B      指定质量评价人                任务索引也是001

                   小张                

                   老马

                                                        （小张和老马都在同一行的单元格内）

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:测试11.zip

表C 表D 测试