如果要从表A复制到表B，假定结构一样，设置表A的DataColChanged事件代码：
If 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
End If
加好友 
发短信
Post By：2011/5/17 7:38:00 [显示全部帖子]
