以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  在入库单未加载的情况下,黄色代码的功能怎样能实现呢  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=142589)

--  作者：lfz123 --  发布时间：2019/10/31 17:52:00 --  在入库单未加载的情况下,黄色代码的功能怎样能实现呢 在入库单未加载的情况下,黄色代码的功能怎样能实现呢 If e.DataCol.name = "申请单号" Then     Dim drs As List (of DataRow) = DataTables("入库单").SQLSelect("申请单号 = \'"& e.newvalue & "\'")     e.DataRow.Save()     For Each dr As DataRow In drs         Dim strs As List (of String) = e.DataTable.SQLGetValues("付款单号","申请单号 = \'"& e.newvalue & "\'")         dr.Lines("付款单号") = strs     Next End If

--  作者：有点蓝 --  发布时间：2019/11/1 8:41:00 --   黄色代码没有问题，如果要保存数据，参考：http://www.foxtable.com/webhelp/topics/2901.htm