以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  改变原来表格里面的内容  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=196480)

--  作者:yangwenghd
--  发布时间:2025/5/2 14:01:00
--  改变原来表格里面的内容
大佬们  在订零管理窗口_Table3 复制到其它表以前,改变里面的内容的同时,为什么“出库记录”这个表的序号管理_库产档序号列也会被改为转库存 呢
感谢 感谢 


Dim t As Table = Tables("订零管理窗口_Table3")
For i As Integer = t.TopPosition To t.BottomPosition \'选择的行
    \'’For i As Integer = 0 To t.Rows.Count - 1
    
    Dim dra As Row = Tables("出库记录").addnew
    

    dra("出库数据_单套数量") = e.form.controls("Label14").text
    
    dra("出库数据_订产数量") = e.form.controls("NumericComboBox1").text
    
    dra("序号管理_项目序号") = t.Rows(i)("序号管理_项目序号")
    dra("序号管理_订产序号") = t.Rows(i)("订产零序号")
    dra("序号管理_订零序号") = t.Rows(i)("订产零序号")
    
    dra("序号管理_库产档序号") = t.Rows(i)("订零信息_零件号")
      t.Rows(i)("订零信息_计出状态") = "转库存"  \'改变被复制的行的内容
    
Next