以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助，发布前和发布后  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=34423)
--  作者：晕了快扶我
--  发布时间：2013/6/7 12:54:00
--  求助，发布前和发布后


图片点击可在新窗口打开查看此主题相关图片如下：发布前.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：发布后.jpg
图片点击可在新窗口打开查看
执行同一段代码后

Tables("标签表").Current.Clone
Dim r As Row = Tables("标签表").Current
Dim dr As DataRow = DataTables("标签统计表").Find("物料编码 =\'" & r("物料编码") & "\' And 规格 = \'" & r("规格") & "\'")
If dr IsNot Nothing Then
    dr("数量") = DataTables("标签表").Compute("sum(数量)","物料编码 =\'" & dr("物料编码") & "\' And 规格 = \'" & dr("规格") & "\'")
End If

 

点解？
--  作者：晕了快扶我
--  发布时间：2013/6/7 13:10:00
--  
我觉得有点莫名其妙啊
--  作者：晕了快扶我
--  发布时间：2013/6/7 13:24:00
--  
顶！
--  作者：Bin
--  发布时间：2013/6/7 16:33:00
--  
你这代码写在哪里的?
--  作者：Bin
--  发布时间：2013/6/7 16:33:00
--  
上例子吧,这真是有点莫名其妙!
--  作者：晕了快扶我
--  发布时间：2013/6/7 17:32:00
--  

莫名其妙啊

发布前可以找到那行，发布后找不到