以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于统计某几列数据的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=99288)

--  作者:ltty5200
--  发布时间:2017/4/16 18:11:00
--  [求助]关于统计某几列数据的问题
老师,麻烦解答下:
1.我想统计出table内 第三行到第二十五行中第五列数据的求和,请问如何编写代码实现?
2.题一求出来的值我要赋值给一个变量,这个变量我用来参加运算并放入第二十八行的第九列中。

以上2个场景我的项目中用的很多,请老师麻烦教下这2个问题的代码,谢谢!

--  作者:有点蓝
--  发布时间:2017/4/16 22:52:00
--  
Dim count As Integer = Math.Min(24,Tables("表A").Rows.Count - 1)
Dim sum As Double = 0
For i As Integer = 2 To count
    sum += Tables("表A").Rows(i)("第五列")
Next

--  作者:有点色
--  发布时间:2017/4/17 9:40:00
--  

 回复楼主,foxtable不是应该这样用的。不要这样计算和赋值,如果你需要统计结果,你可以单独做一个统计表。


--  作者:ltty5200
--  发布时间:2017/4/17 12:41:00
--  
sum += Tables("表A").Rows(i)("第五列"),这个语法好怪,是有错误吗?
--  作者:ltty5200
--  发布时间:2017/4/17 12:43:00
--  
可是我的系统很复杂,是一个很复杂的报表,表的格式是固定的,就是里面的数据必须这样没规律的计算。本来想用excel,可excel不支持多人协同,你有好的建议吗?
--  作者:有点色
--  发布时间:2017/4/17 14:56:00
--  
以下是引用ltty5200在2017/4/17 12:43:00的发言:
可是我的系统很复杂,是一个很复杂的报表,表的格式是固定的,就是里面的数据必须这样没规律的计算。本来想用excel,可excel不支持多人协同,你有好的建议吗?

 

为什么一定要这样用表格计算。你换一种呈现的方式不行?比如用窗口,直接让其输入值。