主题：[求助]数据表的一列复制另外一数据表一列失败

各位老师，我是讲Datatables 出入查询表中的数据 “入库数量”和”出库数量“复制到 Datatables 库存查询表的后面第1天， 第2天，。。。第7天单元中，

但得到的数据不对，不知道哪里出问题了，请老师指教。 Datatable表之间，列数据的复制问题。

非常感谢！！

For =0 to 6

  For Each dr6 As DataRow In =DataTables("出入查询表").DataRows

            For Each dr7 As DataRow In DataTables("库存查询表").DataRows

                dr7("第" & i+1 & "天_入库数")=dr6("入库数量")

                dr7("第" & i+1 & "天_出库数")=dr6("出库数量")

            Next

  Next

next

For Each dr6 As DataRow In DataTables("出入查询表").DataRows
   
    Dim fdr As DataRow = DataTables("库存查询表").find("第一列 = '" & dr6("第一列") & "'")
    If fdr IsNot Nothing Then
        For i As Integer = 0 To 6
            fdr("第" & i+1 & "天_入库数")=dr6("入库数量")
           
            fdr("第" & i+1 & "天_出库数")=dr6("出库数量")
        Next
    End If
Next

太感谢大红袍老师了，解决了！！！！ 也学习了！ 感恩您！！！