- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何例子四表重新计算一遍 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=28718)
-- 发布时间：2013/2/15 23:39:00
-- 如何例子四表重新计算一遍
如何例子四表重新计算一遍，及时更新
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:例子四.table |
-- 发布时间：2013/2/16 1:27:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:例子四.rar |
-- 发布时间：2013/2/16 9:15:00
--
楼上正解，其实直接填充就可以求解了的，不需要重新激发事件。
Dim f As New Filler
f.SourceTable = DataTables("例子四") \'指定数据来源
f.SourceCols = "日期,产品" \'指定数据来源列
f.ExcludeExistValue = True
f.DataTable = DataTables("例子二") \'指定数据接收表
f.DataCols = "日期,产品" \'指定数据接收列
f.Distinct = True
f.Fill() \'填充数据
-- 发布时间：2013/2/16 9:36:00
--
新数据，我慢慢填充数据可以。如果我把入库 出库数据 拷贝进去怎么办哪？
-- 发布时间：2013/2/16 9:48:00
--
以下是引用TGGSTGGS在2013-2-16 9:36:00的发言：
新数据，我慢慢填充数据可以。如果我把入库 出库数据 拷贝进去怎么办哪？
为什么要慢慢填充，不是直接可以使用代码直接填充进去的么？二楼有例子，你的问题是？
-- 发布时间：2013/2/16 12:06:00
--
例子二表不管它。我的问题是自动刷新例子四表。
[此贴子已经被作者于2013-2-16 12:06:33编辑过]
-- 发布时间：2013/2/16 12:18:00
--
您的例子有问题，示例数据和您描述的问题不一致，不知道您要刷新例子四的什么数据！再者，您可以举一反三嘛！
-- 发布时间：2013/2/16 15:44:00
-- 我要的是这个结果
及时更新
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:例子四.xls |
-- 发布时间：2013/2/16 16:28:00
--
简单一点，就一句代码。
DataTables("例子四").DataCols("产品").RaiseDataColChanged()
要效率高一点就几句代码，不过效率也高不了多少。
-- 发布时间：2013/2/17 9:34:00
--
[此贴子已经被作者于2013-2-17 9:35:22编辑过]