主题：这个代码如何修改

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

 老大 这个代码 我不能删除产品的当前行 删除 会提示. 不能通过已删除的行来访问该行的信息   我应该如何修改?

我打开CaseStudy目录下的示例文件“模拟关联表.Table”，没有你说的问题啊。

最好用例子说话。