主题：[求助]这段代码有问题吗？

If e.Table.Name = "成品出库.成品颜色花型" Then
    If Forms("成品出库").Opened Then
        If e.Table.Current IsNot Nothing Then
            Forms("成品出库").Controls("Table2").Table.Filter = "颜色花型编号 = " & e.Table.Current("_Identify")
            Forms("成品出库").Controls("Table3").Table.Filter = "颜色花型编号 = " & e.Table.Current("_Identify")           
        Else
            Forms("成品出库").Controls("Table2").Table.Filter = "1=2"
            Forms("成品出库").Controls("Table3").Table.Filter = "1=2"
        End If
    End If
End If

 

运行时，显示如下错误：

此主题相关图片如下：1.png


此主题相关图片如下：2.png


此主题相关图片如下：3.png

此主题相关图片如下：4.png


此主题相关图片如下：5.png

什么情况啊，搞不懂，请高手指点

删除后，重新添加表控件，现在不出现找不到table2了，显示找不TABLE3了，明明我把TABLE3也删除后重加添加了，为何还会有这种情况？

这是窗口截图，能看出控件名称吗
此主题相关图片如下：6.png

有点甜老师，可以告诉我你的QQ号吗，文件有些大，不好发

已发，有点甜老师

 

有点甜老师，有没有找出问题所在？