主题：在数据导入时出现缺失的情况,求指导

导入 TXT的 合并数据.

在窗体 数据导入到  关联的 子表的时候 , 会出现 部分数据掉失的情况

请老师帮忙看下  附件  窗体 的代码 那里错了  谢谢咯

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

点击浏览该文件:管理项目2.table

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

点击浏览该文件:2012-10-15.txt

你漏掉了一行吧？

         If fdr Is Nothing Then
                Dim r As Row = t.Addnew()
                r("条码") = cs(1)
                r("数量") = cs(2)
            Else
                fdr("数量") =fdr("数量")+cs(2)
            End If

多谢指导 狐爸，   赋值都忘记了 ！