Imports System.Diagnostics
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinExplorerBar
Private Sub Button29_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button29.Click
' For Groups that are not currently in view, reset the Group's appearance properties to
' their default setttings.
Dim i As Integer
For i = 0 To Me.ultraExplorerBar1.Groups.Count - 1
If (Me.ultraExplorerBar1.Groups(i).IsInView = False) Then
Me.ultraExplorerBar1.Groups(i).Settings.AppearancesSmall.Appearance.Reset()
End If
Next
End Sub