以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何实现这样的统计效果?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=56559)

--  作者:sxy_123456
--  发布时间:2014/9/9 8:38:00
--  [求助]如何实现这样的统计效果?
如何实现这样的统计效果?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目4.zip

第三列通过第二列的相同工程合计自动计算得出。


--  作者:Bin
--  发布时间:2014/9/9 8:57:00
--  
什么意思.没看懂?   把第二列在第三列用百分比的形式显示?

如下
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目4.rar



--  作者:sxy_123456
--  发布时间:2014/9/9 9:15:00
--  
不是这样的,我想第三列的数据是第二列每行数据占同一工程第二列合计的百分比
--  作者:Bin
--  发布时间:2014/9/9 9:18:00
--  
If e.DataCol.name="第二列" Then
    If e.DataRow.IsNull("第二列")=False Then
        e.DataRow("第三列")=e.DataRow("第二列") / e.DataTable.Compute("sum(第二列)")*100 & "%"
    Else
       e.DataRow("第三列")=""
    End If
End If

--  作者:sxy_123456
--  发布时间:2014/9/9 11:40:00
--  
我要的计算结果不是sum(第二列),而是同一工程名称的sum(第二列)
--  作者:Bin
--  发布时间:2014/9/9 11:42:00
--  
那就加个条件

If e.DataCol.name="第二列" Then
    If e.DataRow.IsNull("第二列")=False Then
        e.DataRow("第三列")=e.DataRow("第二列") / e.DataTable.Compute("sum(第二列)","工程名称=\'" & e.datarow("工程条件") & "\'")*100 & "%"
    Else
       e.DataRow("第三列")=""
    End If
End If

--  作者:sxy_123456
--  发布时间:2014/9/9 15:45:00
--  
可以实现我的要求了,如果我想设计一个按钮来实现这个功能,按钮代码应该如何写?
--  作者:Bin
--  发布时间:2014/9/9 15:46:00
--  
for each dr as datarow in datatables(X).datarows
    If dr.IsNull("第二列")=False Then
        dr("第三列")=dr("第二列") / datatables(X)..Compute("sum(第二列)","工程名称=\'" & dr("工程条件") & "\'")*100 & "%"
    Else
       dr("第三列")=""
    End If
next

--  作者:sxy_123456
--  发布时间:2014/9/9 15:55:00
--  
我在按钮click代码中写代码出错
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20140909155404.png
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2014/9/9 16:00:00
--  
你拷贝错了代码