- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- (希望使用代码,而不使用表达式)表A如何编写代码引用表B的收入列和支出列数进行汇总? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=152468)
-- 发布时间：2020/7/12 17:09:00
-- (希望使用代码,而不使用表达式)表A如何编写代码引用表B的收入列和支出列数进行汇总?
1)表A和表B都有一个关联列为"所属年月"列.
2)表A希望引用表B的收入列和支出列,根据对应的"所属年月"进行汇总,实现如下的效果:(使用代码,不使用表达式)
所属年月 总收入 总支出
2020年01月 72 3
2020年02月 222 3
2020年03月 54 45
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
-- 发布时间：2020/7/12 17:29:00
--
另如果表A和表B是外部数据表, 表A可以使用SQL语句来引用表B的数据进行汇总吗?
[此贴子已经被作者于2020/7/12 17:32:56编辑过]
-- 发布时间：2020/7/12 20:54:00
--
参考：http://www.foxtable.com/webhelp/topics/1472.htm
[此贴子已经被作者于2020/7/12 20:54:16编辑过]
-- 发布时间：2020/7/12 21:52:00
--
谢谢有点蓝老师
-- 发布时间：2020/7/13 13:17:00
--
表A的"当月余额"列如何引用表B"余额"列的当月最后一行的余额数? 希望表A的"当月余额"列实现如下效果,已上传附件,请老师帮我写代码
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:引用余额.table |
:
所属年月 总收入 总支出 当月余额
2019年11月 7 2 5
2019年12月 8 3 5
2020年01月 72 7 65
2020年02月 222 3 219
2020年03月 82 55 27
-- 发布时间：2020/7/13 13:18:00
--
比如2020年03月最后一行的余额为27,则引用27
-- 发布时间：2020/7/13 13:57:00
--
If e.DataCol.Name = "所属年月" Then
e.DataRow("总收入") = DataTables("表B").Compute("Sum(收入)","[所属年月] = \'" & e.NewValue & "\'")
e.DataRow("总支出") = DataTables("表B").Compute("Sum(支出)","[所属年月] = \'" & e.NewValue & "\'")
Dim dr As DataRow = DataTables("表B").Find("[所属年月] = \'" & e.NewValue & "\'","日期 desc, _sortkey desc")
If dr IsNot Nothing Then
e.DataRow("当月余额") =dr("余额")
End If
End If
-- 发布时间：2020/7/13 13:59:00
--
谢谢
-- 发布时间：2020/7/13 14:14:00
--
我将上述代码放在表A的DataColChanged事件里,但表A的"当月余额"列,无显示数据出来?
此主题相关图片如下：微信图片_20200713141555.png
[此贴子已经被作者于2020/7/13 14:16:53编辑过]
-- 发布时间：2020/7/13 14:19:00
--
我重置列后可以了
