求助。。。根据条件求和 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以下是引用卟离卟弃在2009-5-21 20:48:00的发言：
不用表达式列。。。。
如果不用表达式列就一定要按重置？？？？

那就在表B的DataColChanged事件中设置如下代码：

if e.DataCol.Name = "发出数量" Then
    Dim dt As Table = Tables("表B")
    Dim s As String = dt.Current("物品编号")
    For Each dr As DataRow in DataTables("表A").Select("[物品编号] = '" & s & "' And [计算类别] = '自动求和'")
        dr("求和数量") = dt.Compute("Sum(发出数量)","[物品编号] = '" & s & "'")
    Next
End If

[此贴子已经被作者于2009-5-22 23:06:13编辑过]

主题：求助。。。根据条件求和