• 软件测试技术
  • 软件测试博客
  • 软件测试视频
  • 开源软件测试技术
  • 软件测试论坛
  • 软件测试沙龙
  • 软件测试资料下载
  • 软件测试杂志
  • 软件测试人才招聘
    暂时没有公告

字号: | 推荐给好友 上一篇 | 下一篇

巧用Visual Basic的TIMER控件

发布: 2007-7-14 20:28 | 作者: 佚名    | 来源: 网络转载     | 查看: 10次 | 进入软件测试论坛讨论

领测软件测试网 作者: 海狼  

  Visual Basic提供一个Timer控件,其本质上是一个具有间隔时间设置所触发的时间程序,使我们可以将其隐藏在系统中,以某一时间间隔触发相关程序。灵活地运用它可以取得很巧妙的效果。

  下面,我们举一个例子。

  我们可以在界面设计中设计出这样一种效果:一行文字在窗体中自左向右逐渐滚动,从右边“滚”出窗体的文字,又在左边逐渐出现。如此循环下去。类似电视上的滚动信息。这样可使你设计的软件显得很生动,极易引起用户的兴趣。其实,使用Visual Basic的Timer控件就可很容易地实现它。

  首先,我们在窗体中设置两个Label控件Label1、Label2。这两个控件中除Left属性外,其他属性设置成完全一样。这主要是为了实现循环滚动的效果。它们的Caption属性设置为要滚动显示的文字。另外再调整好其字体、大小和颜色等。在Form-Load过程中设置Label2.Left=-6240(窗体宽度),Label1.Left=0。这样可保证La?bel1的一部分“滚”出窗体,则Label2的一部分就进入窗体。而形成循环滚动在窗体中设置?/FONT>Timer控件。Timer控件的Interval属性决定滚动的速度,单位是毫秒。例如,我们设置成300,则每隔0.3秒滚动一次。然后,在Timer1-Timer()过程中加入如下程序:

  Private Sub Timer1-Timer()

  Label1.Left=Label1.Left+50Label2.Left=Label2.Left+50If Label1.Left>=6240 ThenLabel1.Left=-6240End IfIf Label2.Left>=6240 ThenLabel2.Left=6240End IfEnd Sub

  滚动效果就形成了,感兴趣的读者可以试试看。只要灵活运用Timer控件,我们还可以设计出更有趣的效果。如用Timer控件控制按钮控件的Visible属性,形成闪烁按钮。用Timer控件控制显示不同的图象,形成简单的动画。

延伸阅读

文章来源于领测软件测试网 https://www.ltesting.net/


关于领测软件测试网 | 领测软件测试网合作伙伴 | 广告服务 | 投稿指南 | 联系我们 | 网站地图 | 友情链接
版权所有(C) 2003-2010 TestAge(领测软件测试网)|领测国际科技(北京)有限公司|软件测试工程师培训网 All Rights Reserved
北京市海淀区中关村南大街9号北京理工科技大厦1402室 京ICP备2023014753号-2
技术支持和业务联系:info@testage.com.cn 电话:010-51297073

软件测试 | 领测国际ISTQBISTQB官网TMMiTMMi认证国际软件测试工程师认证领测软件测试网