Foxtable(狐表) → 用户栏目 → 专家坐堂 → 窗口中的数据表不能实现实时统计


  共有2145人关注过本帖树形打印复制链接

主题：窗口中的数据表不能实现实时统计
帅哥哟，离线，有人找我吗？
cyrollin
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：822 积分：5782 威望：0 精华：0 注册：2015/2/3 22:19:00 		窗口中的数据表不能实现实时统计  发帖心情 Post By：2017/3/22 18:14:00 [只看该作者]

单独数据表里面可以自动实时统计，如果把这个表放到窗口里面，就不能实时统计了。

项目属性的 maintablechanged 也加入了以下语句，也不行：

If MainTable.Name = "表1" Then
    DataTables("表2").dataCols("列名").RaiseDataColChanged()
End If

求解，谢谢！
 回到顶部
帅哥哟，离线，有人找我吗？
cyrollin
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：822 积分：5782 威望：0 精华：0 注册：2015/2/3 22:19:00 		  发帖心情 Post By：2017/3/22 18:15:00 [只看该作者]

没有设置成副表

 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/3/22 22:58:00 [只看该作者]

CurrentTableChanged事件，写代码

 

If CurrentTable.Name = "表1" Then
    DataTables("表2").dataCols("列名").RaiseDataColChanged()
End If
 回到顶部
帅哥哟，离线，有人找我吗？
cyrollin
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：822 积分：5782 威望：0 精华：0 注册：2015/2/3 22:19:00 		  发帖心情 Post By：2017/3/23 9:55:00 [只看该作者]

谢谢，统计列数据的时候，是以当月数据统计的，比如：
列名: "三月_订单“, "三月_客户数"， "四月_订单", "四月_客户数"，。。。
 （这些列前面还有一月， 二月， 后面还有五月，六月等)， 但怎么能统计当前月？
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/3/23 9:58:00 [只看该作者]


 回到顶部
帅哥哟，离线，有人找我吗？
cyrollin
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：822 积分：5782 威望：0 精华：0 注册：2015/2/3 22:19:00 		  发帖心情 Post By：2017/3/23 11:33:00 [只看该作者]

以下是引用有点色在2017/3/22 22:58:00的发言：

CurrentTableChanged事件，写代码

 

If CurrentTable.Name = "表1" Then
    DataTables("表2").dataCols("列名").RaiseDataColChanged()
End If


才试了，不起作用
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/3/23 11:38:00 [只看该作者]

 你什么时候需要实时计算，就在什么事件加上代码 DataTables("表2").dataCols("列名").RaiseDataColChanged()

 

 比如，你可以在dataColChanged事件加上。
 回到顶部
帅哥哟，离线，有人找我吗？
cyrollin
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：822 积分：5782 威望：0 精华：0 注册：2015/2/3 22:19:00 		  发帖心情 Post By：2017/3/23 15:29:00 [只看该作者]

以下是引用有点色在2017/3/22 22:58:00的发言：

CurrentTableChanged事件，写代码

 

If CurrentTable.Name = "表1" Then
    DataTables("表2").dataCols("列名").RaiseDataColChanged()
End If

在此事件加入这个代码，打开和关闭相应窗口变得很慢，是正常的吗？
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/3/23 15:54:00 [只看该作者]

以下是引用cyrollin在2017/3/23 15:29:00的发言：

在此事件加入这个代码，打开和关闭相应窗口变得很慢，是正常的吗？

 

如果你这句代码 DataTables("表2").dataCols("列名").RaiseDataColChanged() 执行耗时，那自然会耗时。

 

1、把你的计算优化一下；

 

2、改变一下计算的思路，不要那么实时的计算结果。
 回到顶部
帅哥哟，离线，有人找我吗？
cyrollin
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：822 积分：5782 威望：0 精华：0 注册：2015/2/3 22:19:00 		  发帖心情 Post By：2017/3/23 16:39:00 [只看该作者]

以下是引用有点色在2017/3/23 9:58:00的发言：

参考

 

http://www.foxtable.com/webhelp/scr/2720.htm

 



恩，采用你的建议，我做了一个按钮，点击后才会重新统计，这样就不会打开和关闭窗口耗时的现象发生了。


但统计当前月数据，我在按钮的CLICK事件加入以下代码，不起作用，没有数据变化：


If CurrentTable.Name = "表1" Then

    

    Dim y As Integer = Date.Today.Year

    Dim m As Integer = Date.Today.Month

    Dim dt1 As New Date(y, m, 1)

    Dim dt2 As New Date(y, m, Date.DaysInMonth(y, m)) '获取本月的最后一天

    Dim Filter As String

    Filter = "日期 >= #" & dt1 & "# And 日期 <= #" & dt2 & "#"

    Tables("表1").Filter = Filter

    

    DataTables("表2").dataCols("列名").RaiseDataColChanged(Filter)


End If
 回到顶部
总数 21 1 2 3 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 4 次数据查询