自动复制行
假定表A有个逻辑列,希望在某行选中此逻辑列时,自动将此行复制到表B,并删除表a中刚才的哪一 行。
If e.DataCol.Name = "逻辑列名" AndAlso e.DataRow("逻辑列名") = True Then Dim dr As DataRow = DataTables("表B").AddNew For Each dc As DataCol In DataTables("表B").DataCols dr(dc.Name) = e.DataRow(dc.Name) NextEnd If
怎样实现当此逻辑列由true 变为false时再删除表b中刚新增的行?