请教老师，
表B（子）与表A（父）形成关联，我用焦点在表B的CurrentChanged里面设置代码，想实现选择表B当前行通过索引号与表C同步焦点，
以下代码，在表与表之间能形成焦点选择，但是把表B放在窗口1，把表C以电子表格的形式设计在窗口2(该窗口无TABLE控件），就无法完成焦点功能
'If Forms("表C").Opened() '如果不用此行代码，表格与表格之间能实现焦点功能
If e.Table.Current Is Nothing Then
Return '则返回
End If
Dim wz As Integer
Dim dr As DataRow
dr = DataTables("表C").Find("[索引号] = '" & e.Table.Current("索引号") & "'")
If dr IsNot Nothing Then
wz = Tables("表C").FindRow(dr)
If wz >= 0 Then
Tables("表C").Position = wz
' End If
End If
End If
加好友 
发短信
Post By：2016/4/27 16:03:00 [只看该作者]
