主题：如何将进仓数量加入盘点中的本月进口数量

在 进仓表里面的  DataColChanged  录入以下代码

 

Select Case e.DataCol.name
    Case "数量","单价"
        If e.DataRow.Isnull("数量") Then
            e.DataRow("金额") = Nothing
        Else
            e.DataRow("金额") = e.DataRow("单价") * e.DataRow("数量")
        End If
End Select
Tables("盘点表").Current("本月入库数量") = DataTables("进仓").Compute("sum(数量)","存货名称 ='" & Tables("盘点表").Current("存货名称") & "'")

有的可以统计，有的不行，如 染料代号为 Y-2的，在明细表中有体现，在盘点表中就没有，这是为什么？谢谢大家的支持。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:祥泰仓库管理系统.rar

您好，就是说代码没有错，可是功能有时灵，有时不灵，有的可以统计，有的不行，但是用了“有点甜"的代码后，功能都实现了，谢谢，能否保持一直是这样的界面，为什么每次离开都要在数据统计里重新设置，才会有这样的效果，谢谢大家。

此主题相关图片如下：enhz8n5zsr3(tan1unq_gna.jpg

已经将子表统计的代码放入：项目属性:afteropenproject ,里面，代码如下：

Dim t As Table = Tables("盘点表.进仓")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
t.GroupAboveData = False
t.TreeVisible = False
t.SpillNode = True

g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "存货名称"
g.TotalOn = "数量,金额"
g.Caption = "{0} 小计"
t.SubtotalGroups.Add(g)

t.Subtotal()

 

但是还是没有上述所工实现的功能，请教一下，这是为什么？

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:祥泰仓库管理系统.rar

PositionChanged ：放入以下代码：

Dim t As Table = Tables("盘点表.进仓")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
t.GroupAboveData = False
t.TreeVisible = False
t.SpillNode = True

g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "存货名称"
g.TotalOn = "数量,金额"
g.Caption = "{0} 小计"
t.SubtotalGroups.Add(g)

t.Subtotal()

  DataColChanged 放的代码如下：

Select Case e.DataCol.name     Case "数量","单价"         If e.DataRow.Isnull("数量") Then             e.DataRow("金额") = Nothing         Else             e.DataRow("金额") = e.DataRow("单价") * e.DataRow("数量")                     End If         Dim fdr As DataRow = DataTables("盘点表").Find("存货名称 ='" & e.DataRow("存货名称") & "'")         If fdr IsNot Nothing Then             fdr("本月入库数量") = DataTables("进仓").Compute("sum(数量)","存货名称 ='" & e.DataRow("存货名称") & "'")         End If End Select 但是为什么，盘点表中的:本月入库数量，一点反映都没有呢？请教一下高手。

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:祥泰仓库管理系统.rar

以手高手叫我放的项目属性，该放的都放了，问题出在哪呢？

关键就是没变化，进仓新增后，盘点表也一点变化也没有

现在就是盘点表一点变化也没有，不管进仓表如何变化，这是怎么一回事呢？

盘点表还是没有变化呀，一点变化没有，这到底是该怎么办？

换了你的代码，还是没有用，看来不是代码的问题。

真的一点变化都没有，你可以下载我的项目看一下，如果这么简单，我也不会一直发贴，谢谢

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:祥泰仓库管理系统.rar