主题：克隆列数据的方法？

库存的页面，每页加载10行数据，但是我有2列，当前库存和上月库存。

我想把当前库存这一列的数据全部克隆到上月库存的列里，如何连后台的数据一起克隆过去呢。

Bin老师，我如果采用SQLtable的方法，使用下面的代码：

For Each dr1 As DataRow In DataTables("盘库窗口_Table1").Select("[当前库存] > 0")

    Dim dr2 As DataRow = DataTables("盘库窗口_Table1").AddNew()
    For Each dc As DataCol In DataTables("盘库窗口_Table1").DataCols
        dr2("上月库存") = dr1("当前库存")
    Next
Next

这样有错误吗，没有错误，表的数据也没有变化！！

当前库存就是已经计算出的结果。我是想把当前库存的数据拷贝到上月库存的列里面，2个列都在一个表里。