主题：求助啊 求助 啊

红袍老师啊

给个代码吧

 

我弄了好久了 也没有进展，下面这段程序是根据实例的产品表  应用到我的程序中也可求出结果。可是我只想在Cpmpute 里加个条件

我加不上去啊 要崩溃了，求助啊   这个代码能在另一个表里根据产品名称列的变化得出订单数量的和，我想加个条件是按月求订单的数量和，

 我在产品表增加了一个列是按日期得出月份。想让这个代码按月统计订单数量。

  这个对我很重要。红袍求解啊。对了还出现了此代码在XP里可以执行，但在WIN7里提示错误。

 

If e.DataCol.Name = "产品" Then     

    e.DataRow("数量") = DataTables("订单").Compute("Sum(数量)","[产品] = '" & e.NewValue & "'")
End If

感谢红袍，让我知道了怎么使用了，现在这段代码在WIN7里正常，等明天在XP的机器里测试下。嘿嘿，烧脑啊！ 我把测试结果告诉你。

红袍：  给你测试了下XP  和 WIN7 里用同一个代码 WIN7提示错误  XP里 可以的结果

 

If e.DataCol.Name = "姓名" Then '发生变化的是产品列.
    '则累计订单表中同名产品总的销售量,然后赋值给变动行的数量列
    e.DataRow("回货总金额") = DataTables("车队管理").Compute("Sum(回货款金额)","[发车姓名] = '" & e.NewValue & "'")
End If

 

提示：.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2014.11.11.1
错误所在事件：表，小车工资表，DataColChanged
详细错误信息：
调用的目标发生了异常。
列“回货总金额”不属于表 小车工资表。

 

 

这是怎么啦  版本错了，还是怎么的啦

 

此主题相关图片如下：qq图片20150920143830.png


此主题相关图片如下：qq截图20150920144205ww.png



此主题相关图片如下：ee.png

再问红袍老师一个问题

我想求行数，（按姓名 按月份）得到行数 

 

 
此主题相关图片如下：33322222.png

 

可是和这个例子好像相反 

 

 
此主题相关图片如下：34343.png

 

这个代码我套用帮助，可是出错 ，似乎逻辑不对，

Dim dr As DataRow = e.DataRow
Dim dt As DataTable =DataTables("学生成绩")
If e.DataCol.Name = "科目" And dr.IsNull("科目") = False Then
    dr("分布_60分以下") = dt.Compute("Count(姓名)", dr("科目") & " < 60")

 

为了用昨天问你的代码，

我加了一个列【发车次数】每个目的地都是一次，可是这样还少个条件，“长春”=长春  这又加不上了。

e.DataRow("长春") = DataTables("车队管理").Compute("Sum(发车次数)", "[姓名] = '" & e.DataRow("姓名") & "' and 月份= '" & e.DataRow("月份") & "'")

 

求红袍老师赐教

 

 

昂  明白了 难道我的两个电脑里的列名不一样？？、不对啊 我是复制的程序啊   我等看下是不是不一样，谢谢 提醒

啊啊啊     啊啊啊  就少个 AND  啊   这代码啊