Imports System.Diagnostics
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinExplorerBar
Private Sub Button32_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button32.Click
' Toggle the visible status of each Group.
Dim group As UltraExplorerBarGroup
For Each group In Me.ultraExplorerBar1.Groups
group.Visible = Not group.Visible
Next
End Sub