标题：TABLE副本的光标指针不能与TABLE同步的问题

此主题相关图片如下：qq截图未命名.jpg


如上图所示，如果才能实现TALE副本的光标指针与TABLE同步呢？

有好的办法吗？

TABLE副本的

CurrentChanged

选择不同数据行后执行，也就是Current属性发生变化后执行。

Dim wz As Integer
Dim dr As DataRow
dr = DataTables("通讯往来").Find("[ID] = '" & e.Table.Current("ID") & "'")
If dr IsNot Nothing Then
    wz = Tables("通讯往来_table1").FindRow(dr)
    If wz >= 0 Then
        Tables("通讯往来").Position = wz
    End If
End If

为什么 老出错出下错误？

此主题相关图片如下：qq截图未命名2.jpg

 wz = Tables("通讯往来_table1").FindRow(dr)  改为： wz = Tables("通讯往来").FindRow(dr)

如果仅仅是与主表同步，只需这样就可以吧

Tables("通讯往来").Position = e.Table.Position

代码应该是：

Dim wz As Integer
If e.Table.Current IsNot Nothing Then
      wz = Tables("通讯往来").FindRow(e.Table.Current.DataRow)
      If wz >= 0 Then
          Tables("通讯往来").Position = wz
      End If
End If

只是不明白，既然要同步，就没必要用副本嘛。