通过

适用于 Visual Basic 6.0 用户的 Timer 控件

  • 项目

更新：2007 年 11 月

Visual Basic 6.0 中的 Timer 控件在 Visual Basic 2008 中由 Timer 组件所取代。某些属性和事件的名称是不同的，在某些情况下，行为也有所不同。

概念差异

Visual Basic 6.0 Timer 控件是一种在设计时实际存在于窗体上的控件；但是它在运行时不可见。

Visual Basic 2008Timer 是设计时添加到栏中的组件；作为组件它没有 Parent 属性。

说明：

除了 Timer 组件之外，.NET Framework 还有两个计时器类：Timer 和 Timer。

Interval 属性

在 Visual Basic 6.0 中，可以通过将 Interval 属性设置为 0 来禁用 Timer 控件。

在 Visual Basic 2008 中，Interval 属性的下限范围为 1。如果将间隔设置为 0，则它将引发运行时异常。Visual Basic 2008Timer 组件使用 Enabled 属性来允许禁用或启用该组件。

用于 Timer 控件的代码更改

下面的示例演示 Visual Basic 6.0 与 Visual Basic 2008 在编码方法方面的差异。

用于启动和停止 Timer 控件的代码更改

下面的代码演示如何在运行时启用和禁用 Timer 控件。

' Visual Basic 6.0
Public Function TimerOn(Interval As Integer)
    If Interval > 0 Then
        ' Start the timer.
        Timer1.Interval = Interval   
    Else
        ' Stop the timer.
        Timer1.Interval = 0 
    End If
End Function

' Visual Basic
Public Sub TimerOn(ByRef Interval As Short)
    If Interval > 0 Then
        ' Start the timer.
        Timer1.Enabled = True
    Else
        ' Stop the timer
        Timer1.Enabled = False
    End If
End Sub

Timer 控件的属性和事件的等效项

下表列出了 Visual Basic 6.0 属性和事件，以及它们的 Visual Basic 2008 等效项。具有相同的名称和行为的属性和事件未予列出。

此表提供相关主题的链接，这些主题对行为之间的差异进行说明。如果 Visual Basic 2008 中没有直接等效项，则提供指向介绍其他替代项的主题的链接。

属性和事件

Visual Basic 6.0

Visual Basic 2008 等效项

Index 属性

新的实现。有关更多信息，请参见 控件数组（针对 Visual Basic 6.0 用户）

Interval 属性

Interval

说明：

Interval 属性的行为已更改。有关更多信息，请参见 Timer Interval 属性的行为已改变。

Parent 属性

新的实现。Timer 是组件并且不可能有父级。

Timer 事件

Tick

升级说明

当 Visual Basic 6.0 应用程序升级到 Visual Basic 2008 时，所有 Timer 控件都升级为 Windows 窗体 Timer 组件。如果找到将 Interval 属性设置为 0 的代码，则向您的代码添加一条升级警告。

请参见

参考

Timer 组件概述（Windows 窗体）