Imports Infragistics.Win.UltraWinToolbars
Imports Infragistics.Win
...
Private Sub _
Specify_a_Different_Appearance_for_a_Tool_on_the_Toolbar_and_Menu_Load(_
ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles MyBase.Load
Me.UltraToolbarsManager1.Tools("NewFile").SharedProps. _
DisplayStyle = ToolDisplayStyle.TextOnlyAlways
Me.UltraToolbarsManager1.Tools("NewFile").SharedProps.AppearancesSmall. _
AppearanceOnMenu.FontData.Bold = DefaultableBoolean.True
Me.UltraToolbarsManager1.Tools("NewFile").SharedProps.AppearancesSmall. _
AppearanceOnToolbar.FontData.Bold = DefaultableBoolean.False
Me.UltraToolbarsManager1.Tools("NewFile").SharedProps.AppearancesSmall. _
HotTrackAppearanceOnMenu.ForeColor = Color.AntiqueWhite
Me.UltraToolbarsManager1.Tools("NewFile").SharedProps.AppearancesSmall. _
HotTrackAppearanceOnToolbar.ForeColor = Color.FromArgb(100, 200, 175)
End Sub