以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  又一个问题,我怎么动态不过去呢?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=52474)

--  作者:悦颜
--  发布时间:2014/6/16 21:38:00
--  又一个问题,我怎么动态不过去呢?


图片点击可在新窗口打开查看此主题相关图片如下:出库登记表.png
图片点击可在新窗口打开查看
Dim cg As DataRow  = e.DataRow
Select Case e.DataCol.name
    Case "出库数量","B价","B合","产品名称","产品编号"
        Dim filter As String
        filter = "产品编号 = \'" & cg("产品编号") & " \' And 产品名称 = \'" & cg("产品名称") & "\'"
        Dim pr As DataRow
        pr = DataTables("库存明细2014年").find (filter)
        If pr IsNot Nothing Then
            Dim su As Double = Tables("出库登记表").compute("Sum(出库数量)","[产品编号] = \'" & pr ("编号") & "\' And [产品名称] = \'" & pr("产品名称") & "\'")
            pr("入库产品已出库数KG") = su
            cg("B价")= pr("A价")
            cg("厂家")= pr("厂家")
            cg("B合") = cg("出库数量") * cg("B价")
        End If
End Select

 


图片点击可在新窗口打开查看此主题相关图片如下:库存明细2014年.png
图片点击可在新窗口打开查看
 请老师帮我看看,“出库登记表”动态不到“库存明细2014年”去,不知哪儿不对了。。。
--  作者:有点甜
--  发布时间:2014/6/16 21:41:00
--  

 你这段代码,只有这一句pr("入库产品已出库数KG") = su是给 库存明细2014年 赋值

 

 你要实现什么?


--  作者:有点甜
--  发布时间:2014/6/16 21:42:00
--  

http://www.foxtable.com/help/topics/1453.htm

 


--  作者:悦颜
--  发布时间:2014/6/16 21:56:00
--  

我想通过(出库登记表)输入“产品编号”和“产品名称”后,自动向表(库存明细2014年)取值“B价”和“厂家”的对应值。同时表(库存明细2014年)自动动态合计相同“产品编号”和“产品名称”的“入库产品已出库数KG”。


--  作者:有点甜
--  发布时间:2014/6/16 21:58:00
--  
 那现在又什么问题?代码正确么?用例子说明问题。
--  作者:悦颜
--  发布时间:2014/6/16 22:03:00
--  

还在啃你给的代码。。。。。


--  作者:有点甜
--  发布时间:2014/6/16 22:09:00
--  
以下是引用悦颜在2014-6-16 22:03:00的发言:

还在啃你给的代码。。。。。

 

做个例子发上来吧,你那段代码看着是没有问题。有问题,要具体说明。

[此贴子已经被作者于2014-6-16 22:09:27编辑过]

--  作者:悦颜
--  发布时间:2014/6/16 23:02:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:丢失.png
图片点击可在新窗口打开查看
显示数据丢失,但想想没丢失呀?
--  作者:有点甜
--  发布时间:2014/6/16 23:23:00
--  
 代码不会出现这个问题,肯定是其它代码影响了。上传例子