这样子刷新，每次都会等待很长一段时间，求帮助？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 这样子刷新，每次都会等待很长一段时间，求帮助？

共有3026人关注过本帖树形打印复制链接主题：这样子刷新，每次都会等待很长一段时间，求帮助？

有点蓝

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：109478 积分：557052 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/3/2 10:39:00 [显示全部帖子]

RaiseDataColChanged会每一行都触发一次，其它代码应该没有问题，然后下面代码也会每一行都执行一次，假设有100行，就会执行200次更新整个表数据的操作，当然就慢了。

Dim d As Date = Date.Now

DataTables("客户表").ReplaceFor("日志", True, "日志时间 <= #" & d.AddMinutes(-2) & "#")

DataTables("客户表").ReplaceFor("日志", False, "日志时间 > #" & d.AddMinutes(-2) & "#")

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：109478 积分：557052 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/3/2 10:55:00 [显示全部帖子]

加个全局变量控制一下,RaiseDataColChanged时候不执行

……

if vars("a") = true

Dim d As Date = Date.Now

DataTables("客户表").ReplaceFor("日志", True, "日志时间 <= #" & d.AddMinutes(-2) & "#")

DataTables("客户表").ReplaceFor("日志", False, "日志时间 > #" & d.AddMinutes(-2) & "#")

end if

……

新建一个控件按钮，代码如下：

'没做天数:

vars("a") = false

DataTables("客户表").datacols("客户").RaiseDataColChanged()

vars("a") = true

有点蓝

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：109478 积分：557052 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/3/2 15:36:00 [显示全部帖子]

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=146710

主题：这样子刷新，每次都会等待很长一段时间，求帮助？