[求助]自动录入窗口，内容录入不进去 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]自动录入窗口，内容录入不进去

共有3980人关注过本帖树形打印复制链接主题：[求助]自动录入窗口，内容录入不进去

有点蓝

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

等级：超级版主帖子：106645 积分：542402 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/5/12 16:39:00 [显示全部帖子]

e.cancel=true

Dim tbl As Table = Tables("材料查询_Table1")

If tbl.Current IsNot Nothing Then

dim r as row = Tables("预计总成本.人材机明细").Current

r("不含税单价") = tbl.Current("不含税单价")

r("单位") = tbl.Current("单位")

r("名称") = tbl.Current("名称")

r("规格型号") = tbl.Current("规格型号")

r("类别") = tbl.Current("类别")

End If

Forms("材料查询").Close()

有点蓝

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

等级：超级版主帖子：106645 积分：542402 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/5/12 16:48:00 [显示全部帖子]

人材机明细，datacolchanged事件有问题，这种代码就不应该用到表事件里。也没看懂这代码需要干什么

有点蓝

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

等级：超级版主帖子：106645 积分：542402 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/5/12 17:05:00 [显示全部帖子]

那也没有必要清空表数据，再重新添加一遍。通过当前行相关列到材料汇总表查询一下没有对应的数据再新增即可。

另外这个事件代码不符合datacolchanged的使用规范：http://www.foxtable.com/webhelp/topics/1522.htm

主题：[求助]自动录入窗口，内容录入不进去