位置:首页 > 数码电子 > VB 神童教程第二章第十三节——Timer 控件

VB 神童教程第二章第十三节——Timer 控件

时间:2005-11-23  |  作者:赛迪网  |  阅读:174
    在 Windows 应用程序中常常要用到时间控制的功能,如在程序界面上显示当前时间,或者每隔多长时间触发一个事件,等等。而 Visual Basic 中的 Timer(时间)控制器就是专门解决这方面问题的控件。

    Timer 控制器在工具箱面板上的图标如图一:


图一


    选中时钟控制器,将鼠标移到界面设计区,在窗体中拖出一个矩形就可以创建一个 Timer 控件了。跟其他控件不同的是,无论你绘制的矩形有多大,Timer 控件的大小都不会变,如图二:


图二


    另外,Timer 控件只有在程序设计过程中看得见,在程序运行时是看不见的。

    一、Timer 控件的属性:

    Timer 控件可以使用 Name 属性与 Enabled 属性,但最重要的是 Interval 即时间间隔属性。

    Interval 属性决定了时钟事件之间的间隔,以毫秒为单位,取值范围为 0 ~ 65535 ,因此其最大时间间隔不能超过 65 秒,即一分钟多一点的时间。如果把 Interval 属性设置为 1000 ,则表示每秒钟触发一个 Timer 事件。

    其语法格式:

    Timer.Interval = X ,其中,X 代表具体的时间间隔。

    二、Timer 控件的 Timer (定时)事件:

    当一个 Timer 控件经过预定的时间间隔,将激发计时器的 Timer 事件。使用 Timer 事件可以完成许多实用功能,如显示系统时钟、制作动画,等等。

    三、示例:

    有如图三这样一个应用程序,标签能够自动显示当前时间。


图三


    1、创建程序界面:

    界面如图四,为了便于大家观看,我们将 LblShow 的边界类型设为 1 。

    另外,别忘了把 Timer1 的 Interval 属性设置为 1000 。


图四


    2、在 Timer1 的 Timer 事件中输入以下代码:

    Private Sub Timer1_Timer()

    LblShow.FontSize = 30

    LblShow.FontName = "宋体"

    LblShow.Caption = "当前时间为:" & Time

    End Sub

    注意,Time 是 Visual Basic 中的关键詞,表示显示系统时间。

福利游戏

相关文章

更多

精选合集

更多

大家都在玩

热门话题

大家都在看

更多