以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  FOXTABLE关联筛选的缺陷  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=29703)
--  作者：jxkqf
--  发布时间：2013/3/12 9:37:00
--  FOXTABLE关联筛选的缺陷

在俩表比对中，FOXTABLE关联筛选只能实现表A有表B没有的记录。

但现实是：

很多比对工作的要求是俩条记录的差异。

 

如：表A有身份证号和工资列，表B有身份证号和工资列。如何比对出同一个身份证号在表A和表B中工资不同的人？
--  作者：jxkqf
--  发布时间：2013/3/12 10:01:00
--  
可否详细一点？
--  作者：jxkqf
--  发布时间：2013/3/12 10:15:00
--  

For Each dr As DataRow In DataTables("cb201301").DataRows
    Dim dr1 As DataRow
    dr1= DataTables("cb201204").Find(" 身份证号 = " & dr("身份证号"))
    If dr1 IsNot Nothing Then
        If dr1("家庭月保障金额")<>dr("家庭月保障金额") Then
            dr("信用社")=dr("信用社") + "变动"
        End If
    End If
Next

 

此代码为何会出错？
--  作者：e-png
--  发布时间：2013/3/12 12:00:00
--  

图片点击可在新窗口打开查看是什么错误也不说