在vb.net中，已经取消了以前版本中控件的ToolTip属性，以 ToolTip 组件来代替，ToolTip 作为一个单独的类，可以让开发人员更加方便的对它进行重写。这里我们就来介绍它的基本使用方法。
在vb.net工具箱中，ToolTip 组件的图标如下图一所示：
一、ToolTip 组件的常用属性为：
1、Active 属性：指示工具提示当前是否活动，其默认值为True，只有活动的工具提示被激活(即Active属性为True)的时候，才会显示提示。
2、AutomaticDelay 属性：工具提示的自动延迟（以毫秒计），默认值为 500。
AutoPopDelay 属性：当鼠标指针在控件内保持静止时，ToolTip 保持可见的时段(以毫秒计)，默认值为 5000。
InitialDelay 属性：工具提示”窗口显示之前，鼠标指针必须在控件内保持静止的时间（以毫秒计）。
ReshowDelay 属性：该属性能够改变前面的工具提示显示后、显示另一“工具提示”窗口前，ToolTip 等待的时间。
“工具提示”窗口首次显示时，InitialDelay 属性的值用来确定最初显示“工具提示”窗口前应用的延迟。如果当前正在显示“工具提示”窗口，并且用户将光标移到另一个显示“工具提示”窗口的控件上，则会在显示新控件的工具提示前使用 ReshowDelay 属性的值。为了使用 ReshowDelay 属性中指定的延迟，必须仍然显示前一个控件的“工具提示”窗口；否则将使用 InitialDelay 属性的值。
如果需要一致的“工具提示”窗口延迟模式，则可以设置 AutomaticDelay 属性。AutomaticDelay 属性将 AutoPopDelay、ReshowDelay 和 InitialDelay 属性设置为基于单个时间值的初始值。每次设置 AutomaticDelay 属性，ReshowDelay 属性就会被设置为 AutomaticDelay 属性值的 1/5。在设置 AutomaticDelay 属性以后，就可以独立设置 ReshowDelay 属性（重写默认值）。
关于 ToolTip 组件的这些设置延迟显示的属性，我们只有在一些很特殊的情况下才用到，所以只对它们做个说明，具体设置可以在属性窗口中设置，或者自行用代码设置，需要注意的是它们都是以毫秒为单位的。
3、ShowAlways 属性：该属性决定“工具提示”窗口在其父控件不活动时是否显示，如果始终显示工具提示，则为 true；否则为 false。默认值为 false。这个属性在以下情况比较有用：
1)、在无模式窗口应用程序中，使“工具提示”窗口无论在哪个无模式窗口处于活动状态时都能显示。
2)、在使用包含许多控件(这些控件都可显示“工具提示”窗口)的 UserControl 创建控件时使用此功能。由于 UserControl 通常是窗体上的不活动窗口，将此属性设置为 true 会使 UserControl 内的控件在任何时间都能显示“工具提示”窗口。
二、常用方法：
1、GetToolTip 方法：获取与指定控件关联的工具提示文本。用法为：
str=ToolTip1.GetToolTip(control)
2、SetToolTip 方法：使工具提示文本与指定的控件相关联，我们可以用它来多次改变同一个控件的工具提示文本，用法如下，下例把Button1按钮的工具提示文本修改为“工具提示文本”：
ToolTip1.SetToolTip(Button1, "工具提示文本")
3、RemoveAll 方法：移除当前与工具提示控件关联的所有工具提示文本。
三、如何使用 ToolTip 组件：
1、在属性窗口中为其它控件关联工具提示文本。
首先在窗体中拖放一个 ToolTip 组件，它将会显示在组件栏中。现在我们要为Button1按钮设置工具提示文本(假设窗体上有这么一个按钮)，选中它，然后在它的属性窗口中找到“ToolTip1 上的 ToolTip”属性，把值设置我们需要提示的文本即可，如下图二所示：
其它控件的设置也一样，窗体的工具提示文本也是这么设置的。
提示：一个 ToolTip 组件可以为多个控件提供工具提示，所以一个窗体上我们放置一个 ToolTip 组件即可；如果不想让某个控件显示工具提示，则使该控件的“ToolTip1 上的 ToolTip”属性值为空。
2、用代码来为控件关联工具提示
我们可以通过SetToolTip 方法来在代码中灵活关联或修改控件的工具提示文本。下面我们用一个实例来了解它的应用。
首先在窗体上拖放一个Label控件，一个TextBox控件，两个Button控件，一个ToolTip 组件，窗体的布局如下图三所示：
现在为示例添加代码：
在“添加提示”按钮的Click事件中添加如下代码，检索窗体中所有的控件，并关联上工具提示文本：
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim cl As Control
For Each cl In Me.Controls
ToolTip1.SetToolTip(cl, cl.Text)
Next
End Sub
在“移除提示”按钮的Click事件中添加代码，以移除所有控件的工具提示文本：
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
ToolTip1.RemoveAll()
End Sub
注意：如果要移除单个控件的工具提示文本则可以使用如下代码：
oolTip1.SetToolTip(Button1, "")'
运行，先不要单击“添加提示”按钮，现在我们把鼠标放置在任意控件上，并不会出现任何的工具提示。
然后单击“添加提示”按钮，把鼠标放到任意控件上，就会出现一个工具提示，提示的文本为该控件的Text属性的文本，如下图四所示：
到这里我们就了解了 ToolTip 组件的基本应用，因为它是一个单独的类，我们还可以进一步深入对它相关的属性进行重写来达到更加丰富的目的，但是不是在这里谈论的范围了，你可以到巧巧读书网学习vb.net更多的知识。
本文作者: