- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]填充平均值 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83751)
-- 发布时间：2016/4/15 20:41:00
-- [求助]填充平均值
下面代码在临时表可以填充平均值，但是在动态表(内部数据源)却不能填充了，如何解决，请各位老师指教，谢谢！
Dim t As Table = Tables("工效分析")
Dim dr1 As Row = t.AddNew() \'增加行
dr1("节拍序号") = "平均"
For Each cl As Col In t.Cols \'列循环
If cl.name <> "节拍序号" Then \'排除列
dr1(cl.name) = t.Compute("Avg(" & cl.name & ")", "节拍序号 <> \'平均\'")
End If
Next
上传工效分析表的截图和表结构截图：
此主题相关图片如下：捕获10.png
此主题相关图片如下：捕获11.png
[此贴子已经被作者于2016/4/15 20:42:56编辑过]
-- 发布时间：2016/4/16 9:36:00
--
上例子测试
-- 发布时间：2016/4/18 0:32:00
--
你列名尝试改成如 工效_20160401，然后再用上面的代码。