以文本方式查看主题

-  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=55554)

--  作者:netfox168
--  发布时间:2014/8/19 9:59:00
--  [讨论] 新增行如何自动输入与上一个记录相同的值?
假设有个订单表,其中有一列为“订单号”,分两种情况:
1. 普通状态 - 新增记录时,如何令 “订单号” 列自动输入上一个记录的订单号?
2. 筛选状态 - 新增记录时,如何令 “订单号” 列自动输入筛选状态下的上一个记录的订单号?

--  作者:Bin
--  发布时间:2014/8/19 10:06:00
--  
datarowsadded事件

if tables("X").current.Index > 1 then
   tables("X").current("订单号")=tables("X").rows(tables("X").current.Index-1)("订单号")
end if

--  作者:有点甜
--  发布时间:2014/8/19 10:06:00
--  

 呃...不是一样么?

 

e.DataRow("订单号") = Tables("表A").Rows(Tables("表A").Count - 1)("订单号")

[此贴子已经被作者于2014-8-19 10:06:56编辑过]

--  作者:netfox168
--  发布时间:2014/8/19 10:21:00
--  
谢谢,不过这行代码放在事件 DataRowAdding  才有效,而不是 DataRowsAdded 。