- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 如何在窗口字表中自动增加记录并自动添加内容？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=114408)
-- 发布时间：2018/2/5 16:23:00
-- 如何在窗口字表中自动增加记录并自动添加内容？
谢谢
此主题相关图片如下：未命名图片.png
此主题相关图片如下：未命名图片.png-- 发布时间：2018/2/5 16:43:00
--
Dim r As Row = Tables("表A").Current
Dim nr As Row = Tables("表A").AddNew
nr("校准编号") = r("校准编号")
nr("本年计划检") = r("下一年检定")
nr("周期天数") = r("周期天数")
-- 发布时间：2018/2/6 9:48:00
--
实验了代码，发现新增的是一条空记录。没有需要自动添加的内容。因为我是在窗体中自动增加一条子表中的记录。我应该如何修改。
谢谢
-- 发布时间：2018/2/6 9:56:00
--
以下是引用malavazos在2018/2/6 9:48:00的发言：
实验了代码，发现新增的是一条空记录。没有需要自动添加的内容。因为我是在窗体中自动增加一条子表中的记录。我应该如何修改。
实验了代码，发现新增的是一条空记录。没有需要自动添加的内容。因为我是在窗体中自动增加一条子表中的记录。我应该如何修改。
谢谢
你表名肯定写错了。贴出你写的代码。
-- 发布时间：2018/2/6 10:11:00
--
Dim r As Row = Tables("计量计划").current
Dim nr As Row = Tables("计量计划").addnew
nr("校准编号") = r("校准编号")
nr("本年计划检定日期") = r("下一年检定日期")
nr("周期天数") = r("周期天数")
-- 发布时间：2018/2/6 10:13:00
--
此主题相关图片如下：未命名图片.png
-- 发布时间：2018/2/6 10:14:00
--
Dim t As Table = e.form.controls("Table1").Table
Dim r As Row = t.current
Dim nr As Row = t.addnew
nr("校准编号") = r("校准编号")
nr("本年计划检定日期") = r("下一年检定日期")
nr("周期天数") = r("周期天数")
-- 发布时间：2018/2/6 10:34:00
--
发生错误提示
此主题相关图片如下：未命名图片.png
-- 发布时间：2018/2/6 10:36:00
--
删除你原来的代码
-- 发布时间：2018/2/6 10:39:00
--
谢谢
该问题已经解决！