- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助][求助]动态列求和 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=120667)
-- 发布时间：2018/6/21 15:50:00
-- [求助][求助]动态列求和
我想根据表B中计算列的项目，来计算表A中对应列的数值之和，结果填入到表A的总计中，不知道用窗口按钮设置代码怎么写？大家有没有参考的代码提供学习一下？
表A结构如下：
此主题相关图片如下：a.png
表B结构如下：
此主题相关图片如下：b.png
开发版
商业版
[此贴子已经被作者于2018/6/21 16:18:14编辑过]
-- 发布时间：2018/6/21 16:03:00
--
搞个商业版的例子
-- 发布时间：2018/6/21 16:12:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.foxdb |
-- 发布时间：2018/6/21 16:27:00
--
Dim lst As List(of String) = DataTables("表B").GetValues("计算列","计算列 is not null")
For Each dr As DataRow In DataTables("表A").DataRows
Dim i As Double = 0
For Each ls As String In lst
i += val(dr(ls))
Next
dr("总计") = i
Next
[此贴子已经被作者于2018/6/21 16:27:52编辑过]
-- 发布时间：2018/6/21 16:39:00
--
已发
-- 发布时间：2018/6/21 17:12:00
--
谢谢大师
-- 发布时间：2018/6/21 17:12:00
--
谢谢老师
