主题：关于窗口查询报错的问题

表格的currentChanged事件

'------------------------------副本Table之行位置联动开始----------------------
If e.Table.current IsNot Nothing Then
    Dim dr As DataRow = e.Table.Current.DataRow
    Dim wz As Integer = Tables("客户信息表").FindRow(dr)
    If wz >=0 Then
        Tables("客户信息表").Position = wz
    End If
End If
'------------------------------副本Table之行位置联动结束----------------------