Foxtable(狐表)用户栏目专家坐堂 → 新增行 继承上行数据并加1


  共有3875人关注过本帖树形打印复制链接

主题:新增行 继承上行数据并加1

帅哥哟,离线,有人找我吗?
有点灰2
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:104 积分:785 威望:0 精华:0 注册:2022/5/7 19:05:00
新增行 继承上行数据并加1  发帖心情 Post By:2022/5/8 16:48:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:03.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:031.png
图片点击可在新窗口打开查看
我想新增一行后  加工工序由2601  变成2602

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105486 积分:536421 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/8 21:26:00 [只看该作者]

到datarowadded事件处理

dim idx as integer = tables(e.datatble.name).findrow(e.datarow)
if idx > -1 then
dim r1 as row =  tables(e.datatble.name).rows(idx-1)
e.datarow("工序") = r1("工序") +1
end if

 回到顶部
帅哥哟,离线,有人找我吗?
有点灰2
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:104 积分:785 威望:0 精华:0 注册:2022/5/7 19:05:00
  发帖心情 Post By:2022/5/9 15:30:00 [只看该作者]

Dim idx As Integer = Tables(e.DataTable.name).findRow(e.DataRow)
If idx > -1 And e.DataRow("图号") =  Nothing Then
    Dim r1 As Row =  Tables(e.DataTable.name).rows(idx-1)
    e.DataRow("生产加工评估_加工工序") = r1("生产加工评估_加工工序") +1
End If

 

 

  我想增加一个判断语句   就是图号列如果是空值  运行下面的程序   这样写为什么不行 


 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105486 积分:536421 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/9 15:42:00 [只看该作者]


 回到顶部