选中行后其他表也自动选中行有问题，帮忙排查 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

If e.Table.Current Is Nothing Then '如果Current为Nothing

Return '则返回

End If

Dim zjzh As Integer

Dim zjzh1 As DataRow

zjzh1 = DataTables("原始数据中间转换").Find("[引用] = '" & e.Table.Current("_IDENTIFY") & "'")

If zjzh1 IsNot Nothing Then

zjzh = Tables("原始数据中间转换").FindRow(zjzh1)

If zjzh >= 0 Then

Tables("原始数据中间转换").Position = zjzh

End If

End If 'Y以上选择本表,定位到钾离子表

如上代码

数据库量大，每个表都加载30行后，选中其中一个后在表A里选中一行后，原始数据中间转换表中不能找到选中这行。如何设置条件

主题：选中行后其他表也自动选中行有问题，帮忙排查