主题：表同步问题

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

点击浏览该文件:发货管理 (3).table

万分感谢，在这里面学到很多，再深入学习一段时间后准备购买开发版，这个试用版只能作为学习用，正常使用还是感觉开发版更好

出现新的问题在服饰发货记录表里添加一个数据，下面服饰账单里会多出一个空行
此主题相关图片如下：微信截图_20170701052530.png

检查“服饰发货记录表”的表事件代码，比如datarowadded、datacolchanged等等

datarowadded无事件

if e.datarow.IsNull("??") = false andalso e.datarow.IsNull("??") = false then
    Select Case e.DataCol.name
        Case "??"
            dim dr as datarow
            if e.OldValue = nothing then
                dr = DataTables("服饰账单").Find("?? = '" & e.NewValue & "' and ?? = '" & e.datarow("??") & "'")
            else
                dr = DataTables("服饰账单").Find("?? = '" & e.OldValue & "' and ?? = '" & e.datarow("??") & "'")
            end if
            If dr Is Nothing Then
                dr = DataTables("服饰账单").AddNew()
                dr("??") = e.DataRow("??")
                dr("??") = e.DataRow("??")
                dr("??") = e.DataRow("??")
                dr("??") = e.DataRow("??")
                dr("kg") = e.DataRow("kg")
            Else
                dr("??") = e.DataRow("??")
            End If
        Case "??"
            dim dr as datarow
            if e.OldValue = nothing then
                dr = DataTables("服饰账单").Find("?? = '" & e.datarow("??") & "' and ?? = '" & e.NewValue & "'")
            else
                dr = DataTables("服饰账单").Find("?? = '" & e.datarow("??") & "' and ?? = '" & e.OldValue & "'")
            end if
            If dr Is Nothing Then
                dr = DataTables("服饰账单").AddNew()
                dr("??") = e.DataRow("??")
                dr("??") = e.DataRow("??")
                dr("??") = e.DataRow("??")
                dr("??") = e.DataRow("??")
                dr("kg") = e.DataRow("kg")
            Else
                dr("??") = e.DataRow("??")
            End If
           
        Case "??","??","??","kg"
            Dim dr As DataRow = DataTables("服饰账单").Find("?? = '" & e.DataRow("??") & "'")
            If dr IsNot Nothing Then
                dr(e.DataCol.Name) = e.DataRow(e.DataCol.Name)
            End If
    End Select
end if

甜哥，您添加的第一句代码中间？？的字符是什么？

谢谢，已测试找到。非常感谢