标题：窗口控件代码提示出错

我有窗口控件TextChanged代码：
Dim Filter As String
With e.Form.Controls("日图号")
    If .Value IsNot Nothing Then
        Filter = "图号 = '" & .Value & "'"
Tables("产品目录").Filter = Filter '筛选
    End If
End With
With e.Form.Controls("日工序序号")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "工序_序号 = '" & .Value & "'"
    End If
End With
With e.Form.Controls("日工艺序号")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "工艺_序号 = '" & .Value & "'"
    End If
End With
If Filter > "" Then
    Tables("产品工艺").Filter = Filter '筛选
    Tables("审核工时_Table3").Filter = Filter '筛选
End If

怎么在打开窗口时会提示：


此主题相关图片如下：1111.gif

 错误提示如此清楚：没有找到[图号]列
产品工艺表有图号列吗？

判断是日图号比较是图号，应该是没有图号列吧。

产品工艺表是窗口绑定表，加载视图有图号列，点击几次提示窗口确定，窗口显示正常，功能也正常，其中有不提示的时候，所以搞不懂是怎么回事

不会吧？

 

产品工艺如果是窗口的Table控件，Tables("产品工艺").Filter 这样的写法就有问题了。

我这样写，窗口编辑器都关不了，Tables("审核工时_产品工艺").
请教C版应该怎样写，谢谢

你的窗口名称是：审核工时？另外，你的窗口表是什么类型？是否是副本，还是绑定到产品工艺表的？

窗口名称是：审核工时，窗口表绑定产品工艺，默认类型：非副本

我把表类型设为副本，调用窗口表名称用Tables("审核工时_Table2").搞定

e.Form.Controls("日图号"),这是什么控件，它的TextChanged事件中的代码是什么？