以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  timertick 事件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=100160)
--  作者：zcgmxf
--  发布时间：2017/5/5 17:02:00
--  timertick 事件

老师，下面的代码放在窗口的timertick 事件中，在win 7 没问题，为什么在xp 系统中会不断刷新窗口屏幕？整个项目都会间隔300毫秒刷新，包括窗口中的表的选项，关闭后没问题。间隔300毫秒。谢谢！

 

e.Form.StopRedraw
Dim lab1 As WinForm.Label = e.Form.Controls("Label5")
If lab1.Width + lab1.Left <= 0 Then
    lab1.left = e.Form.Width
Else
    lab1.left = lab1.left -10
End If
e.Form.ResumeRedraw

[此贴子已经被作者于2017/5/5 17:07:00编辑过]
--  作者：有点蓝
--  发布时间：2017/5/5 17:12:00
--  
去掉e.Form.StopRedraw，e.Form.ResumeRedraw