Foxtable(狐表)用户栏目专家坐堂 → 自动增加行


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

主题:自动增加行

美女呀,离线,留言给我吧!
13775189031
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:870 积分:6018 威望:0 精华:0 注册:2017/12/19 14:46:00
自动增加行  发帖心情 Post By:2018/11/21 10:07:00 [只看该作者]

Select Case e.DataCol.Name
    Case "探伤要求_UT"
        If e.newvalue = False Then
            DataTables("UT报告").DeleteFor("焊缝编号='" & e.DataRow("焊缝编号") & "'")
        Else
            Dim ndr As DataRow = DataTables("UT报告").AddNew
            ndr("零部件编号") = e.DataRow("零部件编号")
            ndr("生产令号") = e.DataRow("生产令号")
            ndr("项目名称") = e.DataRow("项目名称")
            ndr("机组") = e.DataRow("机组")
            ndr("工件类型") = "焊缝"
            ndr("标识号") = "/"
            ndr("材质") = e.DataRow("母材材质_部件1") "/" e.DataRow("母材材质_部件2")
            ndr("规格") = "/"
            ndr("炉批号") = "/"
            ndr("零部件名称") = e.DataRow("零部件名称")
            ndr("零部件图号") = e.DataRow("零部件图号")
            ndr("焊缝编号") = e.DataRow("焊缝编号")
            ndr("数量") = e.DataRow("数量")
            ndr("编制人资质") = "UT"
            ndr("审核人资质") = "UT"
        End If
End Select

 

关联表自动增加行,生成的“材质”列是由“母材材质_部件1”和“母材材质_部件2”两列值生成,中间用“/”隔开,代码要怎么改


 

 ndr("材质") = e.DataRow("母材材质_部件1") "/" e.DataRow("母材材质_部件2")



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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/11/21 10:09:00 [只看该作者]

 

ndr("材质") = e.DataRow("母材材质_部件1") & "/" & e.DataRow("母材材质_部件2")

 


 回到顶部
美女呀,离线,留言给我吧!
13775189031
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:870 积分:6018 威望:0 精华:0 注册:2017/12/19 14:46:00
  发帖心情 Post By:2018/11/21 10:09:00 [只看该作者]

例如

母材材质_部件1   母材材质_部件2

      Q235                 Q345

 

自动增加行后表中“材质”显示要求为  Q235/Q345 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/11/21 10:11:00 [只看该作者]

ndr("材质") = e.DataRow("母材材质_部件1") & "/" & e.DataRow("母材材质_部件2")

 回到顶部