专家坐堂-老师帮忙看下是什么情况Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Dim Result1 As DialogResult

If e.Col.Name = "收入金额_二保" Then

Result1 = MessageBox.Show("是否要提醒业务开单", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)

If Result1 = DialogResult.Yes Then

Dim Cols1() As String = {"日期","车号","收入金额_二保"}

Dim Cols2() As String = {"打款日期","车号","业务类型_二保"}

Dim dr2 As DataRow = DataTables("待办业务").AddNew()

For i As Integer = 0 To Cols1.Length -1

dr2(Cols2(i))= Tables("收入").Current(Cols1(i))

End If

当把数据复制到待办业务表里后，一点保存后，最后一行数据又被复制两行。怎么回事