vb0时间控件timer详解

1、vb6.0时间控件timer详解通过引发Timer事件，Timer控件可以有规律地隔一段时间执行一次代码。语法Timer说明Timer控件用于背景进程中，它是不可见的*以下是他的属性 *Enabled 属性返回或设置一个值，该值用来确定一个窗体或控件是否能够对用户产生的事件作出反应。语法object.Enabled = booleanEnabled属性的语法包含下面部分：部分描述object对象表达式，其值是 应用于”列表中的一个对象。如果 object被省略，则与活动窗体模块相联系的窗体 被认为是object。boolean 一个用来指定object是否能够对用户产生的事件作出反应的布尔表达

2、式。设置boolean 的设置为：设置描述True (缺省)允许 object对事件作出反应。False阻止object对事件作出反应。Enabled属性示例该例子使一个CommandButton控件有效而不管TextBox控件是否包含文本。要试用此例，先将下面的代码粘贴到带有 CommandButton 和TextBox控件的一个窗体的声明部分，然后按下F5键并在文本框中随意输入一些内容。Private Sub Form_Load ()Text1.Text =""清除文本框的内容。Commandl.Caption = "Save"'在按钮上放置

3、标题。End SubPrivate Sub Text1_Change （）If Text1.Text = "" Then ' 查看文本框是否为空。Command1.Enabled = False '使按钮无效。ElseCommand1.Enabled = True ' 使按钮有效。End IfEnd SubInterval 属性返回或设置对 Timer控件的计时事件各调用间的毫秒数。语法object.Interval = millisecondsInterval属性语法有以下组成部分：部分描述object对象表达式，其值是 应用于”列表中的一个对象。

4、milliseconds数值表达式，指定毫秒数， 设置值”中有详细说明，。设置值milliseconds 的设置值为：设置值描述0 （缺省值）使 Timer控件无效。1 to 65,535 设置的时间间隔（以毫秒计），在Timer控件Enabled属性设置为 True时开始有效，例如，10, 000毫秒等于10秒。最大值为 65, 535毫秒，等于 1分钟多一些。说明可以在设计时或在运行时设置Timer控件的Interval属性。使用Interval属性时，请记住：Timer控件的Enabled属性决定该控件是否对时间的推移做响应。将 Enabled设置为False会关闭Timer控 件，设置

5、为 True则打开它。当 Timer控件置为有效时，倒计时总是从其Interval属性的设置值开始。创建Timer事件程序用以告诉Visual Basic 在每次Interval到时该做什么。Interval 属性示例Timer 控件、HScrollBar 控件这个例子可以调整窗体切换颜色的速度。要尝试这个例子，请将代码粘贴到包含(水平滚动条)和 PictureBox控件的窗体的声明部分，然后按 F5键并单击滚动条。Private Sub Form_Load ()Timerl.Interval = 900 '设置时间间隔。HScroll1,Min = 100 '设置最小值。HScroll1.Max = 900 '设置最大值。End SubPrivate Sub HScroll1_Change ()根据滚动条的数值设置时间间隔。Timer1.Interval = 1000 - HScroll1.ValueEnd SubPrivate Sub Timer1_Timer ()在红色和蓝色之间切换背景色。If Picture1.BackC010r = RGB(255, 0, 0) Th