主题：关于表达式列的问题

类似于下图中的表：

此主题相关图片如下：22.jpg

 

现在想自动增加一个表达式列，数据结果为：每个数据值在相同类中的百分比。

 

这个问题如果用记录循环的方式，很好解决。但如果数据记录非常庞大，其计算效率可能会比较低。就尝试用一条表达式，结果总是出错，例子在这里：

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

点击浏览该文件:管理项目11.rar

如果用易表，一个刷新公式就搞定了：[值]/Sumfor("表1","值","类","=",[类])

为什么在foxtable中反而不能实现呢？

狐表表达式的几个函数太弱智，没有比较条件，看来你的问题用表达式直接运算是不可能的了。

R版能不能加一个列,将所有的相同类的先相加,再算百分比

Dim Filter As String
Select Case e.DataCol.Name
    Case "类"
        If e.DataRow.IsNull("类") = False  AndAlso e.DataRow.IsNull("组") = False  Then
            Filter = "[类] = '" & e.DataRow("类") & "'"
            Dim Sum1 As Double = Tables("表A").Compute("Sum(值)",Filter)
             e.DataRow("总值")=sum1
             e.DataRow("百分比")=e.DataRow("值")/e.DataRow("总值")
        End If
   
End Select

 

  我做的,是放在刷新列里的,没有用动态加载列.

 

这个方法在常规情况下进行处理是可以的，但一楼的例子在实际应用中是动态生成的统计表，生成统计表时还需要加个列，以便自动生成百分比数据。

老六已经说了，foxtable的表达式是没有办法的，只能用代码解决

 

郁闷的是，连replacefor都只能替换一个固定的值，无法用表达式！

只能用select得到记录集合然后逐行替换。晕。。

blackzhu的代码可以放在：

 

全局表事件  http://help.foxtable.com/topics/0671.htm

mr-725兄,R版这种事情提出来,是自有它的道理,肯定是碰到他解决不了的难处,我们只是提供一下思路而已.