Imports System.Diagnostics
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinExplorerBar
Private Sub ultraExplorerBar1_SelectedGroupChanging(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinExplorerBar.CancelableGroupEventArgs) Handles ultraExplorerBar1.SelectedGroupChanging
' Don't allow the SelectedGroup to change if the new group has a key of 'Security'
If (e.Group.Key = "Security") Then
e.Cancel = True
End If
End Sub