窗口中副本表不显示新增的行 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 窗口中副本表不显示新增的行

共有1654人关注过本帖树形打印复制链接主题：窗口中副本表不显示新增的行

deliangzhaoe

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：361 积分：3436 威望：0 精华：0 注册：2012/7/24 7:15:00

窗口中副本表不显示新增的行 发帖心情

Post By：2018/4/22 10:50:00 [只看该作者]

窗口A中页面集合七个页面中各有一个表，表中有一共同列“添加维保记录”，点击列打开设计好的窗口B“新增安全设施维保记录“，窗口B中有按钮”新增一行“，设置了如下代码：

Dim r As Row = vars("安全设施").current

Dim a As Table = e.Form.controls("table1").Table

Dim nr As Row = a.addnew

nr("企业名称") = r("企业名称")

nr("设施类别") = r("设施类别")

nr("设施名称") = r("设施名称")

nr("规格型号") = r("规格型号")

nr("设施编号") = r("设施编号")

nr("使用部门") = r("使用部门")

nr("使用位置") = r("使用位置")

七个页面中，窗口B打开后点击新增一行时，只有一个页面不显示新增的行，其他六个均显示，这是怎么回事？

窗口B中表table1是副本表，打开正本表查看时，实际已新增了一行。

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/4/22 22:34:00 [只看该作者]

副本表，你设置了筛选，如果你新增的行不满足你设置的筛选条件，自然不会显示。

deliangzhaoe

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：361 积分：3436 威望：0 精华：0 注册：2012/7/24 7:15:00

Post By：2018/4/23 8:05:00 [只看该作者]

窗口B的afterload设置了代码：

Dim r As Row = vars("安全设施").current

Dim a As Table = e.Form.controls("table1").Table

a.filter = "企业名称 = '" & r("企业名称") & " ' and 设施名称 like '*" & r("设施名称") & "*' And 设施编号 like '*"& r("设施编号") & "*'"

a.Position = a.Rows.Count - 1

新增的一行均自动复制了企业名称、设施名称、设施编号这些列，是符合筛选条件的

只有这一个页面集合中的表新增一行时不显示，其他都显示

[此贴子已经被作者于2018/4/23 8:06:05编辑过]

有点甜

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/4/23 9:28:00 [只看该作者]

试试改成

Dim r As Row = vars("安全设施").current

Dim a As Table = e.Form.controls("table1").Table

a.filter = "企业名称 = '" & r("企业名称") & "' and 设施名称 like '*" & r("设施名称") & "*' And 设施编号 like '*"& r("设施编号") & "*'"

a.Position = a.Rows.Count - 1

下一主题 >> << 上一主题

主题：窗口中副本表不显示新增的行