| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 窗口的table控件问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=171329) |
| -- 作者：大山2 -- 发布时间：2021/8/26 15:17:00 -- 窗口的table控件问题 4、窗口的AfterLoad事件设为： Dim t As Table = Tables("新产品信息表_Table2") With Tables("新产品申请表") If .Current Is Nothing Then t.Filter = "False" Else t.Filter = "新产品名称及规格 = " & .Current("产品临时命名") End IF End With 此段代码确保打开窗口后，Tables("新产品信息表_Table2")只显示当前选定产品的组份表。 说明：新产品信息表窗口中的table2有一列名为：新产品名称及规格；新产品申请表主表有一列名为：产品临时命名。请问这段代码有什么问题吗？
|
| -- 作者：有点蓝 -- 发布时间：2021/8/26 15:19:00 -- t.Filter = "新产品名称及规格 = \'" & .Current("产品临时命名") & "\'" 表达式中的日期用符号#括起来，数值则不需要任何符号括起来，这些和代码中的格式是一样的，唯一不同的是字符串用单引号括起来。 例如： Tables("订单").Filter = "[产品] = \'PD01\'" \'字符用单引号括起来 |