Dim t As Table = Tables("窗口2_Table2")
With Tables("客户资料")
If .Current Is Nothing Then
t.Filter = "False"
Else
t.Filter = "编号 = " & .Current("编号")
End If
End With
Dim t As Table = Tables("窗口2_Table3")
With Tables("客户资料")
If .Current Is Nothing Then
t.Filter = "False"
Else
t.Filter = "编号 = " & .Current("编号")
End If
End With
Dim t As Table = Tables("窗口2_Table4")
With Tables("客户资料")
If .Current Is Nothing Then
t.Filter = "False"
Else
t.Filter = "客户id = " & .Current("编号")
End If
End With
通模拟关联，在同一个窗口里有4个关联副表。窗口事件AfterLoad里怎么写呢？谢谢！
加好友 
发短信
Post By：2018/5/20 14:45:00 [只看该作者]
