以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  一单元格数据修改后，希望把修改的数据复制到另外一个表中的单元格。  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=15935)
--  作者：huanghpp
--  发布时间：2012/1/19 10:02:00
--  一单元格数据修改后，希望把修改的数据复制到另外一个表中的单元格。

一单元格数据修改后，希望把修改的数据复制到另外一个表中的单元格，代码如何写

请赐教！！！
--  作者：狐狸爸爸
--  发布时间：2012/1/19 10:12:00
--  

方法很多，看具体情况。

编程是严谨的，泛泛而问，是无法回答的。

最好做一个简单的例子，传上来，然后说明你的问题。
--  作者：huanghpp
--  发布时间：2012/1/19 13:41:00
--  
Select Case e.DataCol.Name 
    Case "C11" 
    Dim dr As DataRow = DataTables("o").Find(" G = " & "\'" & e.DataRow("C4") & "\'AndAlso B11 = " & "\'" & e.DataRow("C114") & "\'" )
    If dr IsNot Nothing
        e.DataRow("C11")= dr("O")
    End If

End Select

我是要将当前表的e.DataRow("C11")复制到o表的dr("O")中，但上面的代码是反的，谢谢！！！
--  作者：狐狸爸爸
--  发布时间：2012/1/19 14:13:00
--  

e.DataRow("C11")= dr("O")

 

改为：

 

dr("O") = e.DataRow("C11")
--  作者：huanghpp
--  发布时间：2012/1/19 17:30:00
--  

感谢感谢！！！