Imports Infragistics.Win.UltraWinToolbars ... Private Sub Display_ToolTips_for_Tools_Load(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MyBase.Load ' Caption property is displayed as the tooltip Me.UltraToolbarsManager1.ShowToolTips = True Dim btnNew As New ButtonTool("New") Me.UltraToolbarsManager1.Tools.Add(btnNew) Me.UltraToolbarsManager1.Toolbars(0).Tools.Add(btnNew) btnNew.SharedProps.Caption = "New File" btnNew.SharedProps.ToolTipText = "New File..." End Sub