主题：人员库导入历史库后，它对应的家庭信息就丢了

''实时库的字段到历史库字段的导入
Dim dr1 As DataRow=Tables("person").Current.DataRow()
Dim dr2  As  DataRow =  Tables("history").Current.DataRow()
For Each dc  As  DataCol  In  DataTables("person").DataCols 
      dr2(dc.Name) = dr1(dc.name)
Next

老师，这个是人员死亡后，把人员从实时库到如历史库，为啥到到历史库后，它的家庭信息就丢了

人员表，历史表，家庭表，家庭表和身份证号是绑定的，

人员只不过是从一个表导入另外一个表，它的身份证号没变 ，那么它对应的家庭信息就应该有啊？