主题：等于

此主题相关图片如下：qq截图20141008105009.png

当卡号列中某一行出现内容时对应的持卡人 和 分配地点 列 能否自动改成预定的值？

此主题相关图片如下：油卡明细.png
油卡明细表

 

此主题相关图片如下：油卡预分配.png
油卡预分配表

代码如下
If e.DataCol.Name = "卡号" Then          Dim dr As DataRow
     dr = DataTables("油卡明细").Find("卡号 = '" & e.DataRow("卡号") & "'" )
     If dr IsNot Nothing '如果找到, 则设置各列内容
        e.DataRow("持卡人")= dr("持卡人")
         e.DataRow("分配地点")= dr("分配地点")
      End If
 End  If

为什么不按照油卡明细表中的更改呢？

如果在预分配表中持卡人和分配地点都存在别的内容，能不能把这些内容自动替换掉？

预分配表中的内容我是直接从别的地方复制过来的，这两列的内容有很多和油卡明细表不一样， 我的意思是复制过来后能不能直接在预分配表就替换成和油卡明细表这两列一样的内容。