- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 我刚刚接触狐表，想请教老师各表如何自动录入时间 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=104687)
-- 发布时间：2017/8/3 10:20:00
-- 我刚刚接触狐表，想请教老师各表如何自动录入时间
此主题相关图片如下：时间.png
老师，你好，刚刚接触狐表，不懂编程，现在想在产值表中输入日期后，在系数表中、提成表中自动录入日期
-- 发布时间：2017/8/3 10:23:00
--
或者说以上各表的日期列自动引用并记录系统日期
-- 发布时间：2017/8/3 11:26:00
--
各表的DataRowAdded事件编写代码
e.DataRow("日期") = date.Now
-- 发布时间：2017/8/3 15:14:00
--
老师你好，如果我增加一行按上面的事件编写代码日期会自动填写当天日期，但是第二列（面包组系数）、第三列（蛋糕组系数）、第四列（烤炉组系数）、第五列（包装组系数）我想增加一行的时候这些列中自动填入上一行的数值，可以吗，应该怎么写事件代码？
-- 发布时间：2017/8/3 15:59:00
--
DataRowAdded事件编写代码
e.DataRow("日期") = date.Now
Dim fdr As DataRow = e.DataTable.find("_Identify <> " & e.DataRow("_Identify"), "_Identify desc")
If fdr IsNot Nothing Then
e.DataRow("第一列") = fdr("第一列")
e.DataRow("第二列") = fdr("第二列")
End If
-- 发布时间：2017/8/3 16:37:00
--
此主题相关图片如下：新.png
老师，你好，我将 上述代码复制进去后出现错误提示，是什么原因
-- 发布时间：2017/8/3 17:00:00
--
此主题相关图片如下：新.png
把第一列、第二列，改成你自己的列名。
-- 发布时间：2017/8/3 17:19:00
--
谢谢老师，问题已解决