请教老师,我在同一个窗口下设置下面两部分代码好像有互斥,取消其中一段代码,就正常,不然打开窗口时报“未引用对象实例”,其他功能都正常。
窗口AFTERLOAD
Tables("设计待审_Table3").Filter = "1=2" '抑制Table3闪屏
设计待审_Table3的 属性CurrentChanged (副本)
Dim dr As DataRow = e.Table.Current.DataRow '设计待审_Table3当前行与正本该行同步当前行
Dim wz As Integer = Tables("工作策划副表时间审批").FindRow(dr)
If wz >=0 Then
Tables("工作策划副表时间审批").Position = wz
End If