'''=======台帐模拟关联表1:招标信息与项目联系人===========
If Forms("招标信息台帐").Opened() '一定要判断用于模拟关联表的窗口是否已经打开
Dim t As Table = Tables("招标信息台帐_Table2")
With Tables("招标信息台帐_Table1")
If .Current Is Nothing Then
t.Filter = "False"
Else
t.Filter = "系统编号 = '" & .Current("系统编号") & "'"
End If
End With
此主题相关图片如下:66619.png
此主题相关图片如下:77740.png