主题：如何表达同步选择两表中的同一字段内容的行

表A 第一列 1,2,3,4,5

表B 第一列 1,3,5,2,4

要求：

选择表A第二行的时候（即表A第一列的“2”被选中），表B的第四行要被选中（即表B第一列中的“2”所在行要被选中。如何表达？

故障代码如下：

Dim Tab1 As Tables("表A")

Dim Tab2 As Tables("表B")

Dim Int1 As Integer

With Tab1

        Int1 = Tab2.FindRow(Tab2.Cols("第一列") = .Current("第一列"))

        Tab2.Select(Int1,0)

        End With