标题:用什么来代替TIMER
取消只看楼主
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
结帖率:100%
 问题点数:0 回复次数:3 
用什么来代替TIMER
我知道 要使空键或窗体移动 要用到Timer 控件 但是这个控件有个缺点就是会不断的刷新 看起来
很不顺畅 有没有什么 控件可以代替Timer控件 来让其他控件或窗体流畅的移动的 ??
请高手指点
搜索更多相关主题的帖子: TIMER 代替 
2007-02-01 23:16
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
得分:0 

我意思说 除了Timer 控件以外 还有什么空间 可以让 Form Or 其他控件 顺畅的移动
比如 Timer=100
Private Sub Timer1_Timer
Form1.Left = Form1.Left - 10
End Sub
这样 窗体就会从右到左移动 移动过程中不是很流畅
即使是 Timer=1
Private Sub Timer1_Timer
Form1.Left = Form1.Left - 1
End Sub
这样也不成
我意思是 窗体从从右到左高速移动 并且很顺畅


If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-02-02 13:08
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
得分:0 
我试试 看 谢谢指点

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-02-02 16:49
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
得分:0 

为什么 Privatr Sub Command1_Cilck()
Do While Form1>Form1.Left - Fomr1.Width
Form1.Left = Form1.Left - 10
Loop
End Sub
我次次这样代码运行 就会卡机 ?效果可以看到 但是次次F5之后就不可以 退出 要Alt + F4 ....


If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-02-03 12:13



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-119234-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.586849 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved