主题：扩展列汇总的请教

 直接合并字符串的值就行了，每个字符串用 vbcrlf 也就是换行 分割。

参考实例

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=83957&skin=0

 

1、2

 

If e.DataCol.Name = "上传文件" OrElse e.DataCol.Name = "选择" Then
    Dim pdr As DataRow = DataTables("文件主表").find("关联列 = '" & e.DataRow("关联列") & "'")
    If pdr IsNot Nothing Then
        Dim str As String = ""
        For Each dr As DataRow In DataTables("文件副表").Select("关联列 = '" & e.DataRow("关联列") & "' and 选择 = true")
            str & = dr("上传文件") & vbcrlf
        Next
        pdr("接收汇总资料") = str.trim(chr(10), chr(13))
    End If
End If

 

3、列【接收汇总资料】需要设置成多文件列，同时指定存放目录跟上传文件列的一致。