关联子表的多行内容合并显示到父表行的一个字段里 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

父表datacolchanged

If e.DataCol.Name = "SOID" Then
e.DataRow("合同号") = DataTables("子表").SQLGetComboListString("合同号+‘-’+合同数量","[SOID] = '" & e.NewValue & "'").replace("|",",")

End If

子表datacolchanged

Select Case e.DataCol.Name
    Case "合同号","合同数量"
        Dim pr As DataRow
        pr = DataTables("父表").Find("SOID = '" & e.DataRow("SOID") & "'")
        If pr IsNot Nothing Then
            DataTables("父表").DataCols("SOID").RaiseDataColChanged(pr)
        End If
End Select

主题：关联子表的多行内容合并显示到父表行的一个字段里