主题：[原创]取上月的方案生成本月方案

在用户代码中怎加一个执行的功能为’取上个月的方案生成本月方案’，若本月数据已存在，则报错‘本月数据已存在’选择取消或者覆盖已有数据

请上传实例说明问题。

 做一个新增按钮

 

Dim Cols1() As String = {"来源列一","来源列二","来源列三"}
Dim Cols2() As String = {"接收列一","接收列二","接收列三"}
Dim dr1 As Row = Tables("表a").current
Dim dr2 As DataRow = DataTables("表B").AddNew()
For i As Integer = 0 To Cols1.Length -1
    dr2(Cols2(i)) = dr1(Cols1(i))
Next
dr2("月份") = Date.Today.Month

谢谢了，我已经顺利的解决了