- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助] (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69594)
-- 发布时间：2015/6/7 22:08:00
-- [求助]
老师好，我要采购金额列数据不重复显示同时采购金额列数据显示始终在每个ID的最后一行
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:应付款.table |
-- 发布时间：2015/6/7 22:22:00
--
http://www.foxtable.com/help/topics/00144.htm
-- 发布时间：2015/6/8 8:46:00
--
以下是引用深蓝在2015/6/7 22:08:00的发言：
在增加行再次输入相同的客户ID时禁止在采购金额列中显示数据或隐藏上面的数据显示在新增行中。
老师好，我要采购金额列数据不重复显示同时采购金额列数据显示始终在每个ID的最后一行
| 下载信息 [文件大小：300.0 KB 下载次数：2] | |
 点击浏览该文件:应付款.table |
-- 发布时间：2015/6/8 9:29:00
--
DataColChanged事件
If e.DataCol.Name = "客户ID" Then
Dim Filter As String = "[客户ID] = \'" & e.NewValue & "\'"
Dim fdr As DataRow = e.DataTable.Find(filter)
If fdr Is Nothing Then
e.DataRow("采购金额") = DataTables("入库明细").Compute("Sum(入库_金额)", Filter)
End If
End If
-- 发布时间：2015/6/8 10:14:00
--
应收款表在新增行中不再显示相同的统计数据
-- 发布时间：2015/6/8 11:38:00
--
看4楼代码。
-- 发布时间：2015/6/8 12:33:00
--
我把代码直接拷贝到事件里没有反应啊
-- 发布时间：2015/6/8 12:40:00
--
你输入 客户ID 才会有效啊
-- 发布时间：2015/6/8 12:55:00
--
我重置列也没有用啊
此主题相关图片如下：应付款.png
[此贴子已经被作者于2015/6/8 12:55:48编辑过]
-- 发布时间：2015/6/8 14:38:00
--
1、填入客户id号，如果id没有重复，就会执行统计的代码；
2、如果id重复，就不会执行统计的代码；
3、要重置，也要重置客户id列啊