窗口的timeticker事件闪屏（不太明显），怎么回事啊？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

如果默认不选择任何行，进入窗口后，在窗口表的第一行在不断刷新闪屏；如果在窗口表中选择了某一单元格，则不闪屏了。

Dim id=Tables("完善签约审批窗口_Table1").current("_identify")

DataTables("合同基本信息表").StopRedraw() '实现即时刷新数据功能

LockBaseMainForm()

If (user.group="工程一部" And user.isrole("录入")) Or (user.group="工程二部" And user.isrole("录入")) Or (user.group="设计部" And user.isrole("录入"))

DataTables("合同基本信息表").RemoveFor("承办部门='"& user.group &"' and 承办人 is null")

DataTables("合同基本信息表").AppendLoad("承办部门='"& user.group &"' and 承办人 is null")

End If

UnLockBaseMainForm()

DataTables("合同基本信息表").ResumeRedraw()

Dim i=Tables("完善签约审批窗口_Table1").findrow("_identify="& id)

If i>0

Tables("完善签约审批窗口_Table1").position=i

End If

[此贴子已经被作者于2018/3/28 15:14:50编辑过]

主题：窗口的timeticker事件闪屏（不太明显），怎么回事啊？