以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  表间转换  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=24048)

--  作者:方沈
--  发布时间:2012/9/28 9:15:00
--  表间转换

何老师

有两个表  <维修单录入>和<维修单保存>

单<维修单录入>表中的"实施状况"列打勾后,这一行自动在<维修单录入>中删除,自动加到<维修单保存>表中


--  作者:方沈
--  发布时间:2012/9/28 9:16:00
--  

有两个表  <维修单录入>和<维修单保存>

<维修单录入>表中的"实施状况"列打勾后,这一行自动在<维修单录入>中删除,自动加到<维修单保存>表中


--  作者:lin_hailun
--  发布时间:2012/9/28 9:45:00
--  
 可以轻松完成,你做个例子发上来吧。
--  作者:实话实说
--  发布时间:2012/9/28 9:49:00
--  
表A的DataColChanged代码
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)
     Next
     Tables("表A").Current.Delete
End If