工具提示支持（针对 Visual Basic 6.0 用户）

项目
08/18/2008

更新：2007 年 11 月

Visual Basic 6.0 和 Visual Basic 2008 中用于显示工具提示的方法有很大的差异。

概念差异

在 Visual Basic 6.0 中，控件的 ToolTipText 属性用于在运行时显示工具提示。

在 Visual Basic 2008 中，单个 ToolTip 组件就可用于控制窗体上所有控件的工具提示；可将 ToolTip 组件从“工具箱”添加到窗体中。SetToolTip 方法用于根据控件的名称为每个工具提示设置文本。

隐藏工具提示

在 Visual Basic 6.0 中，如果 ToolTipText 属性包含文本，则显示工具提示；如果该属性为空，则不显示工具提示。若要清除多个工具提示的文本，需要依次通过 Controls 集合并将 ToolTipText 属性设置为空字符串。

在 Visual Basic 2008 中，可以通过将空字符串传递给 SetToolTip 方法来避免显示工具提示；可以通过将 Active 属性设置为 false 来清除与 ToolTip 组件相关联的所有工具提示的文本。

自定义工具提示

在 Visual Basic 6.0 中，必须使用 Windows API 调用才能自定义工具提示。

在 Visual Basic 2008 中，提供了许多可以自定义工具提示的外观或行为的新属性，例如更改颜色、设置显示工具提示之前的延迟或创建多行工具提示。

工具提示的代码更改

下面的代码示例演示 Visual Basic 6.0 和 Visual Basic 2008 在编码方法上的不同之处。

显示工具提示的代码更改

下面的示例演示如何在 Visual Basic 6.0 和 Visual Basic 2008 中为 Button 控件设置工具提示。Visual Basic 2008 示例假定 ToolTip 组件在设计时已添加到窗体中。

' Visual Basic 6.0
Button1.ToolTipText = "Save changes"

' Visual Basic
ToolTip1.SetToolTip(Button1, "Save changes")

隐藏工具提示的代码更改

下面的示例演示如何在 Visual Basic 6.0 和 <token>vb_current_long</token> 中隐藏 <languageKeyword>Button</languageKeyword> 控件的工具提示。Visual Basic 2008 示例假定 ToolTip 组件在设计时已添加到窗体中。

说明：
Visual Basic 2008ToolTip 组件还有一个 Active 属性；将此属性设置为 false 将会隐藏与 ToolTip 组件相关联的所有控件的工具提示。

' Visual Basic 6.0
' Hide a single ToolTip.
Button1.ToolTipText = ""
' Hide all ToolTips.
For Each Control in Me.Controls
    Control.ToolTipText = ""
Next

' Visual Basic
' Hide a single ToolTip.
ToolTip1.SetToolTip(Button1, "")
' Hide all ToolTips.
ToolTip1.Active = False

升级说明

在将 Visual Basic 6.0 升级到 Visual Basic 2008 时，在设计时或运行时对 ToolTipText 属性的所有引用都不升级，并且将在代码中插入注释。名为 ToolTip1 的 ToolTip 组件将添加到窗体中；您将需要通过在设计时设置 ToolTip on ToolTip1 属性或在运行时调用 SetToolTip 方法来挂钩工具提示。

如果 Visual Basic 6.0 应用程序使用 Windows API 调用自定义工具提示，则应修改代码以利用 ToolTip 组件的自定义功能。

通过