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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 新增行默认赋值

共有18438人关注过本帖树形打印复制链接主题：新增行默认赋值

yangming

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

加好友

发短信

等级：超级版主帖子：4109 积分：23338 威望：0 精华：21 注册：2008/9/1 20:07:00

Post By：2009/6/17 11:55:00 [显示全部帖子]

直接在表

DataRowAdding

事件中这样写不行吗?

e.datarow("日期") = .Rows(.Rows.Count-1)("日期")

yangming

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

加好友

发短信

等级：超级版主帖子：4109 积分：23338 威望：0 精华：21 注册：2008/9/1 20:07:00

Post By：2009/6/17 12:00:00 [显示全部帖子]

以下是引用狐狸爸爸在2009-6-17 11:58:00的发言：
呵呵，不用With的话，上面的代码要出错的呢。

噢,知道了,呵呵

yangming

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

加好友

发短信

等级：超级版主帖子：4109 积分：23338 威望：0 精华：21 注册：2008/9/1 20:07:00

Post By：2009/6/17 12:13:00 [显示全部帖子]

我这个是放按钮中的,必须是2才对,呵呵
Dim r As Row = CurrentTable.Rows.AddNew()
Dim r1 As Row = CurrentTable.Rows(CurrentTable.Rows.Count-2)
r("第一列") = r1("第一列")

当然也可以不用r1

Dim r As Row = CurrentTable.Rows.AddNew()
r("第一列") = CurrentTable.Rows(CurrentTable.Rows.Count-2)("第一列")

[此贴子已经被作者于2009-6-17 12:14:27编辑过]

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

主题：新增行默认赋值