主题：[求助]模拟关联

currentChanged事件

If Forms("BIOS").Opened() '一定要判断用于模拟关联表的窗口是否已经打开
    Dim t As Table = Tables("BIOS_Table3")
    With e.Table
        If .Current Is Nothing Then
            t.Filter = "False"
        Else
            t.Filter = "子菜单编号 = " & .Current("子菜单编号")
        End If
    End With
End If